ФАКТОРИАЛ

ФАКТОРИАЛ

Произведение всех натуральных чисел от 1 до n называется факториалом натурального числа n.

Обозначение: n! = 1· 2· …· (n – 2) · (n – 1) · n.

Сейчас мы с вами рассмотрим алгоритм вычисления факториала (рис. 1),

где N – ко-во букв;

Условие цикла – это отношение R ≤ N (R меньше или равно N)

R – множитель, значение которого меняется от 1 до N (счетчик)

Произведение накапливается в переменной F, начальная значение равна 1.

Произведение накапливается в переменной F, ее начальная значение равна 1. Цикл заканчивается, когда R=N+1.

F:=1. R:=1.

F:=F*R. R:=R+1.

Вывод F. Конец.

Цикл заканчивается, когда R = N+1.

Рисунок 1. Блок-схема алгоритма

Программа выглядит так:

Program factarial;

 var f, r , n: integer;

 begin

 readln(n);

 f:=1;

 r:=1;

 while r<=n do

       begin

            f:=f*r;

            r:=r+1;

       end;

 writeln(f);

 end.