Люди помогите есть прога перемножающая 2 матрицы,как зделать так что когда вместо размерности n:integer вводиш какой-нибудь не integer не выбрасывало в окно текстового редактора,а здесь же выдало сообщение об ошибке??
var
i: integer;
begin
repeat
Write('Type in a whole number: ');
{$I-}ReadLn(i){$I+}
until IOresult=0;
WriteLn('You''ve entered ',i);
ReadLn
end.
СПС!!!!