Shadwyn
4 год назад
Напишите программу, которая подсчитает сумму натуральных чисел от 1 до nВот !ПРИМЕР! в помощь:Написать пр-му, которая выводит все натуральные числа от 1 до nProgram zd;var i,n: integer;BeginWriteln('Введите n');readln(n);for i:=i to n dobeginwriteln(i,' ');end;end.
ОТВЕТЫ
Brown Jacob
Oct 24, 2020
Program n1;
var n,sum,i: integer;
begin
readln(n);
sum:=0;
for i:=1 to n do sum:=sum+i;
write('сумма: ',sum);
end.
var n,sum,i: integer;
begin
readln(n);
sum:=0;
for i:=1 to n do sum:=sum+i;
write('сумма: ',sum);
end.
585
