lotfan age kasi khast komak kone off bezare to yahoo baram mer30000000000000000000
Printable View
lotfan age kasi khast komak kone off bezare to yahoo baram mer30000000000000000000
khahesh mikonam alan chanrooz migzare yeki komakam kone
yani hishki inja balad nist yeki az in 2ta barnamaro to c benevise??????????????????????????????
plzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz zzzzzzzzzzzzzz
helppppppppppppppppppppppppppppppppppppppppppppppp
یعنی هیچکس اینجا c بلد نیست؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟/
عجب بد شانسم
تو رو خدا خیلی مهمه یکی کمکم کنه
من برنامه بازی ماروپله یا منچ رو به زبان c می خوام.فقط یکیشو هر کدوم شد فرقی نداره
فقط توی c نوشته شده باشه
منم قول می دم هر کمکی از دستم بر بیاد براش انجام بدم.
من دانشجوی کامپیوتر هستم.21ساله از تبریز.
امیدوارم یکی کمکم کنه
من اين سورس را به زبان پاسكال گير آوردم ولي تو تبديل كردن كلاس و procedure به زبان cpp مشكل دارم خواهشن كمك كنيد
کد:program p11;
uses crt;
type
pnode=^node;
node=record
data:integer;
llink:pnode;
rlink:pnode;
end;
const
head:pnode=nil;
var
temp,now:pnode;
i,y:integer;
procedure add(data:integer);
begin
new(temp);
temp^.data:=data;
temp^.rlink:=nil;
temp^.llink:=nil;
if head^.rlink=head then
begin
temp^.rlink:=head;
temp^.llink:=head;
head^.rlink:=temp;
head^.llink:=temp;
end
else
begin
temp^.rlink:=head;
temp^.llink:=head^.llink;
head^.llink^.rlink:=temp;
head^.llink:=temp;
end;
end;
function del(data:integer):boolean;
begin
now:=head^.rlink;
del:=false;
repeat
if now^.data=data then
begin
now^.llink^.rlink:=now^.rlink;
now^.rlink^.llink:=now^.llink;
dispose(now);
del:=true;
break;
end
else
now:=now^.rlink;
until now=head^.rlink;
end;
procedure printlist;
begin
now:=head^.rlink;
if now<>head then
repeat
writeln(now^.data);
now:=now^.rlink;
until now=head;
end;
procedure printreverselist;
begin
now:=head^.llink;
if now<>head then
repeat
writeln(now^.data);
now:=now^.llink;
until now=head;
end;
procedure disposelist;
begin
now:=head^.rlink;
if now<>head then
repeat
temp:=now^.rlink;
dispose(now);
now:=temp;
until temp=head;
dispose(head);
end;
procedure mainmenu;
begin
while true do
begin
clrscr;
writeln('1:Add 2:del 3:print 4:reverse print 5:exit':60);
write(' plesae enter n number : ');
readln(i);
case i of
1: begin
clrscr;
writeln('add':40);
write(' enter the number : ');
readln(y);
add(y)
end;
2: begin
clrscr;
writeln('del':40);
write(' enter the number : ');
readln(y);
if not(del(y)) then
begin
write(' number is not avilabel !');
readkey;
end;
end;
3: begin
clrscr;
writeln('print':40);
printlist;
write(' any key for continue : ');
readkey;
end;
4: begin
clrscr;
writeln('reverse print':40);
printreverselist;
write(' press any key...');
readkey;
end;
5: break
end;
end;
end;
begin
new(head);
head^.llink:=head;
head^.rlink:=head;
mainmenu;
disposelist;
end.
سلام ممنون میشم برنامه 8 وزیر رو برام یه توضیحی بدید که چه طور میشه نوشت و کدش رو بزارید ترجیحا با توضیح کامل با برنامه C++
ممنونم
----------------------------------------------------------------------------------------------------------------------
سوال دومم هم این بود که برای رسم رویه با maple یا mathlab باید به کجا مراجعه کنم (میدونم به اینجا ربطی نداره ولی من پیدا نکردم جایی رو برای این موضوع)
خيلي ممنون با راهنمايي شما مشكلم حل شد. بعد از كمي فكر كردن به اين نتيجه رسيدم كه سازنده رو پاك كنمنقل قول:
ممنون
inja aslan hishki adamo tahvil nemigere vageanke:41:
کسی می تونه عمل ضرب اعداد بزرگ در نمایش مستقیم رو انجام بده؟