Написать программу нахождения суммы всех положительных целых чисел, не превышающих данного натурального числа n, используя цикл с параметром.

Govnyuk Govnyuk    1   16.09.2019 02:40    0

Ответы
9999Ksenya999 9999Ksenya999  07.10.2020 18:51
Var
sum, i, n:integer;
begin
  read(n);
  for i:= 1 to n do
    sum:= sum + i;
  Writeln(sum);    
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика