Подскажите, в чём проблема?
var
p, i: real;
begin
i:= 0.25;
for p := 0 to 16 do
begin
i := i * 2;
end;
writeln('Неверно, ему придётся заплатить: ', i:1:0);
end.
Stack Overflow на русском — это сайт вопросов и ответов для программистов. Присоединяйтесь! Регистрация займёт не больше минуты.
Присоединиться к сообществуВ Pascal цикл For
может итерировать только по Ordinal
-типам, таким как Integer или перечислимы тип. real
и прочие типы с плавающей точкой в for
недопустимы.
prog.pas(7,5) Error: Ordinal expression expected prog.pas(8,2) Fatal: Internal error 200611054