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

79185519305 79185519305    2   04.06.2019 21:50    14

Ответы
Luna2904 Luna2904  05.07.2020 16:56
Var i, N, sum: integer;
begin
  sum := 0;
  readln (N);
  for i := 1 to N do sum := sum + i;
  writeln (sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика