smoslamm
چهارشنبه 30 اردیبهشت 1388, 01:19 صبح
سلام علیکم
من وقتی برنامه زیر
program CaseDemo;
Uses Forms;
var UserIn : Char;
begin
Write(' Enter key: ');
ReadLn(UserIn);
Case UserIn of
'a' :WriteLn('That is a Small a');
'z','Z':WriteLn('That is a small or capital z')
else
WriteLn('That is a character other than an a, z, or Z.')
end;
WriteLn('Press Enter to exit program');
ReadLn {To keep the window from closing until you press Enter}
end .
بنویسم وآن را اجرا(run)کنم این error را میدهد :
raised exception class EInoutError with message 'I/O error 105'.process stopped use step or
برای رفع آن چه کنم واین error به چه معناست واگر ممکن ارورهایی از این قبیل را توضیح بدهید
من وقتی برنامه زیر
program CaseDemo;
Uses Forms;
var UserIn : Char;
begin
Write(' Enter key: ');
ReadLn(UserIn);
Case UserIn of
'a' :WriteLn('That is a Small a');
'z','Z':WriteLn('That is a small or capital z')
else
WriteLn('That is a character other than an a, z, or Z.')
end;
WriteLn('Press Enter to exit program');
ReadLn {To keep the window from closing until you press Enter}
end .
بنویسم وآن را اجرا(run)کنم این error را میدهد :
raised exception class EInoutError with message 'I/O error 105'.process stopped use step or
برای رفع آن چه کنم واین error به چه معناست واگر ممکن ارورهایی از این قبیل را توضیح بدهید