Помогите)) Для заданного натурального числа N вычислить значение его факториала N!=1*2*3...*N

Помогите)) Для заданного натурального числа N вычислить значение его факториала N!=1*2*3...*N
Гость
Ответ(ы) на вопрос:
Гость
var a:array [1..1000] of integer; fac,i,n: integer; begin readln(n); fac:=1; for i:=1 to n do begin a[i]:=i; end; for i:=1 to n do begin fac:=fac*a[i]; end; writeln(fac); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы