求11+2 1+…+10!的程序如下: Private Function s(x As Integer) f=1 For i=1 To x f=f*i Next s=f End Function

admin2020-07-22  32

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

选项 A、Call s(i)
B、Call s
C、y=y+s(i)
D、y=y+s

答案C

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

最新回复(0)