Написать программу для нахождения факториала натурального числа n с использованием функции.

вычисление n!

var n,i,fact: integer;

begin

write(' n (n<=13) введите: ');

readln(n);

fact := 1;

for i := 2 to n do

fact := fact * i;

writeln(n,'! = ',fact);

end.

Объяснение:

вот прога в языке Паскаль вычисляет н факториал