как вставить в программу реакцию на ошибку

[Андрей К-в]

А это сработает потом на Turbo Pascal 6? Дело в том, что в учебном заведении установлена именно она, а для себя я так дистрибутив пока не нашел, пользуюсь тем, что есть

[Hacker19_90]

Если турбо паскаль то IOResult

[unbanned]

begin
for i:=1 to n do begin
for j:=1 to n do begin
write('(',i,',',j,')='); readln(m[i,j]); { Ввод массива }
while m[i,j]='' do begin
writeln('символ не введен, повторите ввод');
readln(m[i,j]);
end;
end;
end;
end;

а если так попробовать?

[Hacker19_90]

Сообщение от unbanned

begin
for i:=1 to n do begin
for j:=1 to n do begin
write('(',i,',',j,')='); readln(m[i,j]); { Ввод массива }
while m[i,j]='' do begin
writeln('символ не введен, повторите ввод');
readln(m[i,j]);
end;
end;
end;
end;

а если так попробовать?

А если мы заместо числа букву введём????
И вообще массив то числовой!

[Андрей К-в]

Код:

begin
for i:=1 to n do begin
for j:=1 to n do begin
write('(',i,',',j,')='); readln(m[i,j]); { Ввод массива }
while m[i,j]='' do begin
writeln('символ не введен, повторите ввод');
readln(m[i,j]);
end;
end;
end;
end;

а если так попробовать?

Пишет ошибку на пустые кавычки.

На букву программа реагирует сразу, т.к. var i, j: integer

[unbanned]

Сообщение от Андрей К-в

Пишет ошибку на пустые кавычки.

хм... там не кавычки а две '...

[Андрей К-в]

try
    Read(chislo);
except 
    Writeln ('АААААА КАРАУЛ ОШИБКА ! ВЫ ВВЕЛИ НЕ ВЕРНОЕ ЧИСЛО!)
end;

Ничего не меняется, если выполнить как Вы сказали, я так думаю необходимо после except вставлять: Блок обработки исключений "
on имя: тип do оператор;" Но какой?

Ну это я так просто выразился насчет кавычек.

[Hacker19_90]

Сообщение от Андрей К-в

Ничего не меняется, если выполнить как Вы сказали, я так думаю необходимо после except вставлять: Блок обработки исключений "
on имя: тип do оператор;" Но какой?

что именно не меняется??? программа вылетает? Вы exe сделайте и запустите! Из среды ясное дело не обработает!

[Андрей К-в]

Сообщение от Hacker19_90

что именно не меняется??? программа вылетает? Вы exe сделайте и запустите! Из среды ясное дело не обработает!

Не меняется, в смысле всё осталось так же, как и было изначально. Программа работает нормально, но на пустые элементы массива никак не реагирует.

[Hacker19_90]

Понимаете! при нажатии Энтера ввод происходит не через буфер! Поэтому тупо Readln энтер не ловит!!! Что бы отловить энтер используйте ReadKey!
И ещё у вас нет и не может быть пустых элементов! При нажатии просто энтера вы ничего не вводите!