[填空题] 下列程序运行后的输出结果是 【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

![[填空题] 下列程序运行后的输出结果是 。 Private Sub f(k,s)s=1For j=1 To k s=s*jNext End Sub Private Sub Command1_C [填空题] 下列程序运行后的输出结果是 。 Private Sub f(k,s)s=1For j=1 To k s=s*jNext End Sub Private Sub Command1_C](http://www.mshxw.com/aiimages/31/253781.png)
