Предмет: Информатика,
автор: maristepantsova
используя цикл с заданным условием продолжения работы написать программу которая вычисляет сумму первых n натуральных чисел
Ответы
Автор ответа:
0
var i,n,s:integer;
begin
read (n);
s:=0;
for i:=1 to n do
begin
s:=s+i;
end;
writeln (s);
end.
begin
read (n);
s:=0;
for i:=1 to n do
begin
s:=s+i;
end;
writeln (s);
end.
Интересные вопросы
Предмет: Қазақ тiлi,
автор: Аноним
Предмет: Информатика,
автор: alemgul8258
Предмет: Қазақ тiлi,
автор: serluemerlue
Предмет: Физика,
автор: Sveter
Предмет: Биология,
автор: kris000999