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.

Answer 2

The issue in your code is that you have not closed the program block with an "end." Here's the corrected version of your code:

pascalCopy code
program Program1;

var
  i, sum: integer;

begin
  sum := 0;
  for i := 1 to 100 do
  begin
    sum := sum + i;
    writeln('Шаг N', i);
    writeln('sum =', sum);
  end;
end.

In this corrected version, the program block is properly closed with the end. statement, resolving the error you encountered.