Используя цикл с заданным условием продолжения работы написать программу которая вычисляет сумму первых n натуральных чисел

Question

Надюра

1 октября, 20:01

+3

Ответы (1)

Знаете ответ?

Маргуша · Answer 1

Var i, n, s:integer;

begin

read (n) ;

s:=0;

for i:=1 to n do

begin

s:=s+i;

end;

writeln (s) ;

end.