Изобразить блок-схему алгоритма вычисления произведения первых N натуральных чисел - PascalABC.NET

Формулировка задачи:

Изобразить блок-схему алгоритма вычисления произведения первых N натуральных чисел P = 1*2*3*…*N для заданного натурального значения N. Написать программу на Паскале и выполнить ее для N = 3, 5, 8, 10, 20.

Решение задачи: «Изобразить блок-схему алгоритма вычисления произведения первых N натуральных чисел»

Листинг программы

begin
  var N := ReadLnInteger('N = ');
  var P : Biginteger := 1;
  for var i := 2 to N do P *= i;
  WriteLn('P = ', P);
end.

Объяснение кода листинга программы

Программа запрашивает у пользователя ввод числа N (N =).
Создается переменная P типа Biginteger и инициализируется значением 1.
Запускается цикл for, который выполняется от i = 2 до i = N.
Внутри цикла значение переменной P умножается на текущее значение i.
После окончания цикла выводится значение переменной P на экран.