Предмет: Информатика,
автор: sidelnikovan1
Решить задачу: наайти сумму всех натуральных чисел от 1 до n. Используя цикл for.
Ответы
Автор ответа:
0
program zadacha;
var
i,s,n:integer;
begin
write('Введите n=');
readln(n);
s:=0; for i:=1 to n do s:=s+i;
writeln('Сумма s=',s);
end.
var
i,s,n:integer;
begin
write('Введите n=');
readln(n);
s:=0; for i:=1 to n do s:=s+i;
writeln('Сумма s=',s);
end.
Автор ответа:
0
s:=0; for i:=1 to n do s:=s+i;
Похожие вопросы
Предмет: Математика,
автор: ajdynkyzyajdana33
Предмет: Алгебра,
автор: xenialykova
Предмет: Другие предметы,
автор: k1neka
Предмет: Математика,
автор: АнфисаК5225
Предмет: География,
автор: lika7tebekova