Помогите с Паскалем. вычислите p=(n+1)! (Факториал)

Помогите с Паскалем. вычислите p=(n+1)! (Факториал)
Гость
Ответ(ы) на вопрос:
Гость
Program n1; var n: integer; function fact(x: integer ):real; begin if x=0 then fact:=1 else fact:=fact(x-1)*x; end; begin readln(n); write(fact(n+1)); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы