问题 填空题

下列程序运行后的输出结果是______。
Private Sub f(k,s)
  s=1
  For j=1 To k
    S=S*j
  Next
End Sub
Private Sub Command1_Click()
  Sum=0
  For i=1 To 3
    Call f(i,s)
    Sum=Sum+s
  Next
   Print Sum
End Sub

答案

参考答案:I

解析: 本题考查的重点是在子过程的调用过程中,虚实参数的传送问题,变量s按十传送。子过程f()求n!,sum的计算过程为1!+2!+3!=1+2+6=9

配伍题 B1型题
单项选择题