سلام میشه مراحل نصب پاسکال رو بنویسید؟:-?
نمایش نسخه قابل چاپ
سلام میشه مراحل نصب پاسکال رو بنویسید؟:-?
سلام
مرحله خاصی نداره, شما برنامش مثل همه برنامه های دیگه نصب میکنی البته اگر تحت ویندوز باشه و اگر تحت داس باشه نیاز به نصب نداره و یکراست اجرا میشه.
---------- Post added at 04:12 PM ---------- Previous post was at 04:10 PM ----------
[/COLOR]من نصب کردم ولی فقط یه پوشه توربو پاسکال در قسمت programfile ویندوز ساخت
داخلش فایل اجرایی نداره؟ و اینکه شاید با نسخه ویندوزت سازگار نیست.
فایل اجرایی نداره فقط چند تا پوشه هست :106:نقل قول:
نوشته اصلی توسط shafiei7
تو فولدر bin باید فایل اجراییش باشهنقل قول:
نوشته اصلی توسط آرتیمیس
فقط چندتا فایل داس هست :-sنقل قول:
نوشته اصلی توسط 1eng.ir
همیناست دیگه :دینقل قول:
نوشته اصلی توسط آرتیمیس
ببین کدومش توربو پاسکاله، همونو اجرا کن
مشکلم حل شد ممنون از راهنماییتون:53::53::53:[COLOR="Silver"]
---------- Post added at 06:00 PM ---------- Previous post was at 05:16 PM ----------
---------- Post added at 06:04 PM ---------- Previous post was at 06:01 PM ----------
برنامه رو نوشتم ولی بعد ازاینکه Run رو کلیک می کنم چیزی اجرا نمیشه:39:
uses wincrt;
زدی ؟ برنامه که نوشتی رو بذار....
program P1;
uses CRt;
Begin
write('this is test');
End.
شما نسخه ویندوزی نصب کردی.
باید wincrt بزنی.... crt مال نسخه داس هست....
خوب این Error رو میده:نقل قول:
نوشته اصلی توسط Sajad
File not found(WinCRT.TPu)
:-b
مطمئنی کامل نصب کردی ؟
شما این نسخه رو به روشی که میگم نصب کن راحت و آسوده ! نسخه داس هست.
1- دانلود برنامه:
دانلود نرم فزار با حجم ۲ مگابایت
پاسورد فایل : www.kamyabonline.com
2- آنزیپش کن
3- یه فلدر به نام tp داخل درایو c بساز
4- محتویات فایل آنزیپ شده رو به مسیر c:\tp منتقل کن.
5- برو توی c:\tp و فایل برنامه رو اجرا کن (آیکونش معلومه)
6- تو این نسخه باید uses crt; استفاده بشه
7- حالشو ببر
8- مشکلی بود خبر کن
این erorr رو میدهنقل قول:
نوشته اصلی توسط Sajad
Begin expected
:71:
کجا این ارور رو میده ؟ سیستم عاملت چیه ؟ چند بیت ؟
سیستم عاملم ویندوزه بعد از اینکه دستورات رو توی پاسکال نوشتم برای اجرا این پیغام رو میدهنقل قول:
نوشته اصلی توسط sajad
برنامه ای که مینویسی رو بذار.....
اگه عمومی نمیخوای توی پ خ ارسال کن
به صورت کامل
نقل قول:
نوشته اصلی توسط Sajad
program P1
Uses CRT;
Begin
Write ('test');
end.
سمیکلان بعد از program P1 نذاشتی
توی برنامه گذاشتمنقل قول:
نوشته اصلی توسط Sajad
توی massege ها میگه کجای کار مشکل داره....
این برنامه رو اجرا کن ببین مشکل داره باهاش و اگه داره ببین تو Massegeها چی مینویسه اونو بذار...
کد:uses
crt;
var
adad: array [1..255] of integer;
inter,tak,amal:string;
e,c,w,i,j,tol,io,v,z,y,iop:integer;
adad1,adad2:longint;
op,opera:char;
flag:boolean;
save:text;
begin
clrscr;
write ('Please Inter Formula (for example 2+3) : ');
repeat
flag:=true;
readln (inter);
tol:= length(inter);
if tol=0 then
begin
write ('it is blank... please try again: ');
flag:=false;
end;
for i:= 1 to tol do
begin
tak:= inter [i];
if tak='0' then adad [i]:= 0 else
if tak='1' then adad [i]:= 1 else
if tak='2' then adad [i]:= 2 else
if tak='3' then adad [i]:= 3 else
if tak='4' then adad [i]:= 4 else
if tak='5' then adad [i]:= 5 else
if tak='6' then adad [i]:= 6 else
if tak='7' then adad [i]:= 7 else
if tak='8' then adad [i]:= 8 else
if tak='9' then adad [i]:= 9 else
if tak='+' then adad [i]:= 10 else
if tak='-' then adad [i]:= 20 else
if tak='/' then adad [i]:= 30 else
if tak='*' then adad [i]:= 40 else
begin
write ('invalid format. please try again: ');
flag:=false;
break;
end;
end;
for i:= 1 to tol do
begin
j:=adad[i];
if (j=10) or (j=20) or (j=30) or (j=40) then
begin
z:=i+1;
for c:= z to tol do
begin
y:=adad[c];
if (y=10) or (y=20) or (y=30) or (y=40) then
begin
write ('invalid format. please try again: ');
flag:=false;
break;
end;
end;
end;
end;
v:=adad[1];
if (v=10) or (v=20) or (v=30) or (v=40) then
begin
write ('invalid format. please try again: ');
flag:=false;
end;
w:=adad[tol];
if (w=10) or (w=20) or (w=30) or (w=40) then
begin
write ('invalid format. please try again: ');
flag:=false;
end;
for i := 2 to tol-1 do
begin
w:=adad[i];
if (w=10) or (w=20) or (w=30) or (w=40) then
begin
io:=adad[i];
iop:=i;
break;
end
else
if (i=tol-1) then
begin
write ('invalid format. please try again: ');
flag:=false;
end;
end;
until flag=true;
case io of
10 : op:='+';
20 : op:='-';
30 : op:='/';
40 : op:='*';
end;
assign (save,'save.dat');
rewrite (save);
writeln (save,op);
for i:= 1 to iop-1 do
write (save,adad[i]);
writeln(save,'');
for i:= iop+1 to tol do
write (save,adad[i]);
close (save);
reset (save);
readln (save,opera);
readln (save,adad1);
readln (save,adad2);
close(save);
writeln (adad1,' ',opera,' ',adad2);
write ('Result: ');
case opera of
'+' : Write (adad1+adad2);
'-' : Write (adad1-adad2);
'*' : Write (adad1*adad2);
'/' : Write (adad1/adad2);
end;
writeln;
write ('Press enter to exit...');
readln;
end.
این Erorr رو میده:نقل قول:
نوشته اصلی توسط Sajad
unknown indentifier
#:-S
خوب جناب میگه کدوم خط مشکل داره دیگه. یه اطلاعات دقیقتر بده بشه بفهمی عیب کار از کجاست...
متن کامل بده اگه اسکرین شات بتونی بدی که چه بهتر....
http://www.persianpic.info/upload/images/1ifi.gifنقل قول:
نوشته اصلی توسط Sajad
ctrl + f9 میزنی این خطا رو میده ؟
ویندوزت چی هست ؟ چند بیتی ؟
آره، Xp 32بیتینقل قول:
نوشته اصلی توسط Sajad
begin
end.
خالی بزنی هم خطا میگیره ؟
آرهنقل قول:
نوشته اصلی توسط Sajad
file not found wincrt.tpu
شما فقط .begin end زدی ؟
این چرا خطای wincrt گرفته ؟ شما گفتی wincrt یا خودش ؟ اصلا تو این کامپایلری که من دادم wincrt تعریف نشده ! شما با کدوم کامپایلر میری ؟!
مطمئنم کامپایلر مشکلی نداره چون دیشب خودم یجا برای یه نفر از همون آدرس دانلود کردم و نصب کردم براش.
ولی تو اینکه شما کاری که من دارم میگم انجام بدی شک دارم !
شما کامپایلری که من گفتم از مسیر c:\tp\Turbo Pascal 7.0.pif اجرا کن
صفحه خالی باشه
توش فقط و فقط بنویس
خط اول begin بعد هم end. هیچی دیگه هم نمیخواد بعد ctrl + f9 کن ببین خطا میده یا اجرا میشه و بسته میشه سریع...
Turbo Pascal 7.0.pif همچین فایل توی پوشه tp نیست من از پوشه Bin برنامه رو اجرا می کنمنقل قول:
نوشته اصلی توسط Sajad
من برنامه رو از سایت دانلود نکردم فایل زیپش رو از استادمون گرفتم
امکانش هست که بر اثر ویروسی بودن سیستم خراب شده باشه؟
رسما ما رو سر کار گذاشتین ؟نقل قول:
نوشته اصلی توسط آرتیمیس
خوب 2 مگ چیه ! دانلود کنید کاری که گفتم بکنید اجرا بشه دیگه !
شاید فایلهایی که شما الان دارید ناقص هست.
بعدشم کامپایلر شما داس هست اما شما wincrt میزنی که اشتباه هست.
کاری که گفتم رو بکن تموم شه !!!!!
ببخشیدنقل قول:
نوشته اصلی توسط Sajad
من برنامه رو دانلود کردم نصب هم کردم از روش شما رفتم ولی فایل این پیغام رو میده:turbopascal7.0.pif
is not a vaild win32 application
مشکل از ویندوزت هست پس....
بقیه اش هم که اجرا نمیشه به دلیل ویندوزت هست.
اگه درست گفته باشی و سیستم عاملت یه xp معمولی هست بدون هیچ مشکلی باید اجرا بشه.
با این حال شما یه سری هم به propertis فایل c:\tp\Turbo Pascal 7.0.pif بزن
اندازه فایلش که صفره:106:نقل قول:
نوشته اصلی توسط sajad
به نظرتون ویندوز عوض بشه درست میشه ؟
راستی بابت جواباتون هم ممنون
:53::53:
995 bytes هست حجمش . کمتر از 1KB
من مشکل رو نمیتونم جای دیگه ببینم. 70% مربوط به ویندوز هست. ولی خوب شاید هم از جای دیگه باشه.
ولی رو سیستم معمولی با ویندوز معمولی اگه عین روش من جلو رفته باشید 100% باید جواب بده. (مگر اینکه باز هم کوتاهی کرده باشید و یه مرحله رو نرفته باشید.)
بابت تشکر هم خواهش . همانا خداوند دکمه تشکر را آفرید !
موفق باشید.
ما هم همين مشكل error 15 رو داريم كسي هست كمك كنه و نسخه كامل و مطمئن اين نرم افزار رو بزاره /...... تاالان 6 تا دانلود كردم هركدوم يه مورد داشتن .