求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

admin2018-12-20  40

问题 求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
  Dim 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的功能是实现一个数的阶乘,而题目是求1到10的阶乘的和,则程序空缺处应该是过程s返回值的累加,因此就应该为y=y+s(i)。
转载请注明原文地址:https://jikaoti.com/ti/etm0FFFM
0

最新回复(0)