vb代码:
fuction jiecheng()
if n>0 then
jiecheng=n*jiecheng(n-1)
else
jiecheng=1
end if
end fuction
pascal代码:
function ni(n:integer):integer;
begin
if n=1 then ni:=1
else ni:= ni* ni(n-1);
end;
# 用Python实现
>>> def f( n ):
... if n > 0: t = n * f( n-1 )
... else: t = 1
... return t
...
>>> f( 2 )
2
>>> f( 3 )
6
>>> f( 4 )
24
>>> f( 5 )
120