求l!+2!+…+10!的程序如下: Private Function S(X As Integer) f=l For i=l ToX f=f*I Next s=f End Function

admin2018-12-20  27

问题 求l!+2!+…+10!的程序如下:
    Private Function S(X As Integer)
    f=l
    For i=l ToX
    f=f*I
    Next
    s=f
    End Function
    Private Sub Command l—Click()
    Dim i As Integer
    Dim Y As Long
    For i=l To 10
    Next
    Print Y
    End Sub
    为实现功能要求,程序的横线处应该填入的内容是(     )。

选项 A、Call S(i)
B、Call s
C、Y=Y+S(i)
D、Y:Y+s

答案C

解析 题目过程s的功能是实现一个数的阶乘,而题目是求l到l0的阶乘的和,则程序空缺处应该是过程s返回的值累加,因此就应该为Y=Y+s(i)。
转载请注明原文地址:https://jikaoti.com/ti/pPm0FFFM
0

最新回复(0)