有如下程序： Priv~e Sub Form＿Click() Dim S As Integer，P As Integer P=1 For i=1 To 4 For j=l To I

admin2020-07-22 22

问题有如下程序：
Priv~e Sub Form＿Click()
Dim S As Integer，P As Integer
P=1
For i=1 To 4
      For j=l  To I
         S=S+j
      Next j
      P＝P*S
Next 1
Print P
End Sub
程序运行后，单击窗体，则输出结果是(    )。

选项 A、90
B、180
C、400
D、800

答案D

解析程序是一个双层For循环，外层循环变量的值决定内层For循环的次数。当i＝1时，内层循环1次，s=1，p=1；当i＝2时，内层循环2次，s=1+l+2=4，p=1*4=4；当i=3时，内层循环3次，s=4+1+2+3=10，p=4*10=40：当i＝4时，内层循环4次，s=10+l+2+3+4=20，p=40*20=800：

转载请注明原文地址:https://kaotiyun.com/show/tSHp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类