Код
uses crt;
var m:array[1..10] of byte;
i:byte;
Begin
clrscr;
for i:=1 to 10 do
readln(m[i]);
writeln;
for i:=10 downto 1 do
writeln(m[i]);
readln;
end.
у меня вот так пашет, а вообще странно, эта ошибка означает либо то, что
ожидантся переменная порядкового типа, либо вот :
Ошибки возникающие во время выполнения программ
Некоторые ошибки, обнаруженные во время выполнения программы, приводят к появлению на экране сообщения вида
Runtime error ппп at хххх:уууу
(Ошибка периода исполнения ппп по адресу хххх:уууу)
где ппп - номер ошибки; хххх:уууу - адрес (сегмент и смещение). После этого сообщения программа завершает свою работу.
Ошибки периода исполнения делятся на четыре категории: ошибки, обнаруживаемые ДОС (коды ошибок с 1 до 99), ошибки ввода-вывода (с 100 по 149), критические ошибки (с 150 по 199) и фатальные ошибки (коды ошибок с 200 до 255).