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) : Встречен конец файла, а ожидался оператор
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) : Встречен конец файла, а ожидался оператор
begin
sum:=0;
for i:=1 to 100 do
begin
sum:=sum+i;
writeln('Шаг N',i);
writeln ('sum =',sum);
end;
Program1.pas(14) : Встречен конец файла, а ожидался оператор
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
end.