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

admin2018-10-15  30

问题 求1!+2!+……+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,y As Long
    For i=1 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的作用是求参数的阶乘,因此应该在每次循环中累加f函数的值,参数为循环变量i。
转载请注明原文地址:https://jikaoti.com/ti/Nym0FFFM
0

最新回复(0)