作业帮 > 综合 > 作业

求计算机vb中的题:编写程序,求S=A!+B!+C!,阶乘的计算分别用sub过程和functi

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/05/01 23:45:53
求计算机vb中的题:编写程序,求S=A!+B!+C!,阶乘的计算分别用sub过程和functi
求计算机vb中的题:编写程序,求S=A!+B!+C!,阶乘的计算分别用sub过程和function过程两种方法来实现.
首先“落叶|无情”的代码很好,但是我想题目中所说“用Sub过程和Function过程两种方法来实现”的意思,应该是用这两个独立实现求阶乘和,而不是在Sub中还要调用Function.当然,在Sub过程中,最终结果还要用Msgbox之类的语句来显示出来,但这么做应该也是符合题意的.所以,我的回答是在他之前的成果上,按题意做了些修改.而且 0也是有阶乘的,所以得考虑变量为0的情形.
Function 过程Function JC ( n as Integer) as Long
    If n < 0 Then Exit Function
    If n = 0 Then
        JC = 1
        Exit Function
    End If
    For i = 1 to n
        JC = JC * i
    Next
End Function

S = JC(A) + JC(B) + JC(C)Sub 过程public S as Long
public x as Long
x = 0
Sub JC(ByVal n as Integer)
    If n < 0 Then Exit Sub
    If n = 0 Then x = x + 1
    jc = 1
    For i = 1 to n
        jc = jc * i
    Next
    x = x + jc
End Sub

Sub Sum()
    S = JC(A) + JC(B) + JC(C)
End Sub
以上,请采纳吧.
再问: 非常感谢