Цикл Repeat Вычислить факториал числа: n!=1*2*3*..*n

Question

Информатика: Цикл Repeat Вычислить факториал числа: n!=1*2*3*..*n

bladone439 · Answer

program Factorial;

var

n: integer;

result: longint;

begin

result := 1;

Readln(n);

repeat

result := result * n;

n := n - 1;

until

n = 0;

Writeln(result);

end.

Цикл Repeat
Вычислить факториал числа: n!=123..n