编写递归函数求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

解决方案 »

  1.   

    lhj770121003 () 同学,题不会做可以请教同学和老师,这种直接索取答案的方式不大好吧,而且你一道题发好几遍把这个版块搞得够乱的啊
      

  2.   

    Public Function s(n As Integer) As Long
    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
      

  3.   

    if n=1 then
    s=  1
    else
    s=   s(n-1)
    end if
    print "s(10)=";s(10)
    为了分。
      

  4.   

    Public Function s(n As Integer) As Long
    If n = 1 Then
    s = 1'这样清楚点
    Else
    s = n * s(n - 1)
    End If
    End Function