下列程序运行后的输出结果是【 】。 Private Sub f(k,s) s=1 For j=1 To k s=s*j Next End Sub Private Sub Comman

admin2009-03-15  33

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

选项

答案9

解析 本题的重点是在子过程的调用过程中,虚实参数的传送问题,变量s按十传送。子过程f()求n!, sum的计算过程为1!+2!+3!=1+2+6=9
转载请注明原文地址:https://kaotiyun.com/show/JD1p777K
0

随机试题
最新回复(0)