7 lines
97 B
Mathematica
7 lines
97 B
Mathematica
function f=fac(n)
|
|
if n==0
|
|
f=1;
|
|
return
|
|
else
|
|
f=n*fac(n-1);
|
|
end
|