Напишите программу, которая подсчитает сумму натуральных чисел от 1 до n
Вот !ПРИМЕР! в помощь:
Написать пр-му, которая выводит все натуральные числа от 1 до n
Program zd;
var i,n: integer;
Begin
Writeln('Введите n');
readln(n);
for i:=i to n do
begin
writeln(i,' ');
end;
end.

Извините, мы не пишем "sum" вообще, никогда и нигде, можете ли вы заменить на сложение и написать по примеры, описанной задачи сверху?

И написать по примеру задачи, описанной сверху?*

Program n1;var n,sum,i: integer;beginreadln(n);sum:=0;for i:=1 to n do sum:=sum+i;write('сумма: ',sum);end.