xxxxxxxxxx
def factorial(n):
if n==0:
return 1
elif n == 1:
return 1
return n*factorial(n-1)
xxxxxxxxxx
FUNCTION FACTORIAL (N: INTEGER): INTEGER
(* RECURSIVE COMPUTATION OF N FACTORIAL *)
BEGIN
(* TEST FOR STOPPING STATE *)
IF N <= 0 THEN
FACTORIAL := 1
ELSE
FACTORIAL := N * FACTORIAL(N - 1)
END; (* FACTORIAL *)