این ارور یعنی چی ؟

[alooche.khanoom]

سلام
برج هانوی به زبان پاسکال نوشتم کامپایل می کنم ارور نمی ده ! ولی موقع اجرا ارورمی ده !
error200=division by zero
این ارورو قبلا هم دیدم نمی دونم یعنی چی ؟ اینم برناممه
program Hanoi;
uses
crt,dos;
var m,h,i:integer;
procedure Move(h:integer; F,T,U:char);
begin
if h = 1 then
begin
write ('Move disk from ');
write (F);
write (' to ');
writeln (T);
end
else
begin
Move(h-1, F,U,T);
write ('Move disk from ');
write (F);
write (' to ');
writeln (T);
Move (h-1, U,T,F)
end
end;
begin
clrscr;
write ('Number of disk =');
readln (h);
Move (h,'A','B','C');
m:=m+1;
for i:=1 to h do
m:=m*2;
writeln('Number of Movement =',m-1);
readln
end.
کسی میدونه این ارور مال چیه و چطور رفع می شه ؟
نمی دونم بازم اشتباه اومدم یانه ! :blink:

 

[MahdiΩ]

سلام
خطای تقسیم بر صفر که خطای مهلک زمان اجراست !

شما از یونیت CRT استفاده کردین اما بعضی ورژن های TP روی CRT ایراد دارن و در نتیجه به این خطا برمیخورید.

برای رفع این مشکل فایل Fix رو که این ایراد رو برطرف میکنه باید دریافت و نصب کنید.

توی اینترنت بگردین پیداش میکنین.

اگه پیدا نکردین بگین تا بگردم و آپلودش کنم.

اگه براتون مهم نیست از دستور ClrScr استفاده کنید میتونید CRT رو از قسمت Uses حذف کنید تا مشکل برطرف بشه.

 

[alooche.khanoom]

مرسی درست شد !

 

[MahdiΩ]

قابلی نداشت.

این هم برنامه ای که با استفاده از اون میتونید از یونیت CRT بدون خطا استفاده کنید.ممکنه بعضی ها لازم داشته باشن.

فایل را Unzip کنید و بعد محتویات پوشه رو توی پوشه BIN کپی کنید.

بعد فایل t7tplFix.exe رو اجرا کنید و P و سپس q رو بزنید.