Question

ОЧЕНЬ НУЖНА ПОМОЩЬ!
ДАЮ 40 БАЛЛОВ


Напиши программу на языке Паскаль и выведи ответ на экран.
Вычислить n!, если значение n пользователь вводит с клавиатуры.

Если n=11, то на экране выводится n!=
.

Answer 1

program factorial;

var

   n, i: integer;

   result: longint;

begin

   write('Input n: ');

   readln(n);

   result := 1;

   for i := 2 to n do

       result := result * i;

   writeln('n! = ', result)

end.