Регистрация
29 Авг 2013
Сообщения
96
Репутация
0
Спасибо
0
Монет
0
Var k,i,x,n:real;

begin;

for i:=1 to n+1 do

readln(k);

begin

k:=x-n/x-(n-1);

writeln (k)

end;

end.

выдаёт ошибку Program1.pas(4) : Ожидался порядковый тип
 
Эта программа не могла работать!
Даже если i и n сделать переменными перечислимого типа, откомпилировать и запустить программу, то всё равно получите ошибку.
У вас будет ошибка деления на 0
 
ну там же название программы первым писалось, извините 15 лет прошло. потом подключение модулей, а потом переменные.
 
ну так ответ в самой ошибке - строка 4, ожидался порядковый тип.
Эх, паскаль... проверить все точки с запятыми первым делом. Почему нет всяких там юсесов? Где Програм Програм1?
Двадцать лет назад... какой же я старый...
 
Назад
Сверху