RosettaCodeData/Task/Factorial/MATLAB/factorial-2.m

8 lines
97 B
Mathematica

function f=fac(n)
if n==0
f=1;
return
else
f=n*fac(n-1);
end