Question

var i,a,sum : integer;
begin

sum:=0;
for i:=1 to 100 do
begin
sum:=sum+i;

writeln('Шаг N',i);
writeln ('sum =',sum);
end;
Program1.pas(14) : Встречен конец файла, а ожидался оператор

Answer 1

Ответ: Ну ты просто программу забыл завершить словом end.