编写递归函数求5!
public function s(n as integer) as long
if n=1 then
s= 'S值处应该输入什么
else
s= 'S值处应该输入什么
end if
end function
下面是调用递归函数
private sub form_click()
print "s(10)=";s()
end sub
public function s(n as integer) as long
if n=1 then
s= 'S值处应该输入什么
else
s= 'S值处应该输入什么
end if
end function
下面是调用递归函数
private sub form_click()
print "s(10)=";s()
end sub
If n = 1 Then
s = n
Else
s = n * s(n - 1)
End If
End Functionprivate sub form_click()
print "s(10)=";s()
end sub
s= 1
else
s= s(n-1)
end if
print "s(10)=";s(10)
为了分。
If n = 1 Then
s = 1'这样清楚点
Else
s = n * s(n - 1)
End If
End Function