Kekus
5 год назад
Срочно 50 поинтов напишите программу которая подсчитает сумму натуральных чисел от 1 до n
ОТВЕТЫ
Emiliya
Oct 24, 2020
var i,s,n: Integer;
begin
readln(n);
for i := 1 to n do begin
s := s + i;
end;
writeln(s);
end.
begin
readln(n);
for i := 1 to n do begin
s := s + i;
end;
writeln(s);
end.
14
Смежные вопросы:
