您所在位置：主题：好难啊！头昏！递归题目
蓝色旋5421
[专家分：0] 发布于 2008-03-02 12:02:00
cls
u=0
c=4
for y=0 to 4
call comb(x,y,z)
u=u+z
next y
?"u";u
end
sub comb(a,b,c)
if b=0 or b>a then
c=1
else
call comb(a-1,b-1,c)
c1=c
call comb(a-1,b,c)
c=c1+c
end if
end sub[em10][em10][em10][em10][em10]
u=0
c=4
for y=0 to 4
call comb(x,y,z)
u=u+z
next y
?"u";u
end
sub comb(a,b,c)
if b=0 or b>a then
c=1
else
call comb(a-1,b-1,c)
c1=c
call comb(a-1,b,c)
c=c1+c
end if
end sub[em10][em10][em10][em10][em10]
