问题 填空题

下列程序运行后的输出结果是 【9】
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

单项选择题 B型题
单项选择题