Напишите программу алгоритм который по введенному числу N (1_<__<10) вычислит и напечатает значение N!=123 * ... * N

Question

Вераня

18 января, 03:43

+1

Ответы (1)

Знаете ответ?

Клавдий · Answer 1

Program test;

Var

n, i, a:integer;

Begin

Write ('введите число: ') ;

readln (n) ;

for i:=1 to n do a:=a*n;

write (n,'! = ', a) ;

End.

Напишите программу алгоритм который по введенному числу N (1_<__<10) вычислит и напечатает значение N!=1*2*3 * ... * N