Предмет: Информатика,
автор: imwaltcat
составить алгоритм для вычисления суммы чисел от 1 до n
Ответы
Автор ответа:
0
Program n1;
var S,i,n: integer;
begin
i:=1;
S:=0;
writeln('введите n: ');
readln(n);
while (i<=n) do
begin
S:=S+i;
i:=i+1;
end;
writeln('сумма: ',S);
end.
var S,i,n: integer;
begin
i:=1;
S:=0;
writeln('введите n: ');
readln(n);
while (i<=n) do
begin
S:=S+i;
i:=i+1;
end;
writeln('сумма: ',S);
end.
Похожие вопросы
Предмет: Математика,
автор: aminicka
Предмет: Алгебра,
автор: shihanza
Предмет: Алгебра,
автор: fox9311
Предмет: Алгебра,
автор: sergeinapalkov