有如下程序: Private Sub Form Click() Dim s As Integer,p As Integer p=1 For i=1 To 4 For i=1 To i s=s+j Ne

admin2017-04-25  7

问题 有如下程序:
    Private Sub Form Click()
    Dim s As Integer,p As Integer
    p=1
    For i=1 To 4
    For i=1 To i
    s=s+j
    Next j
    p=p*s
    Next i
    Print p
    End Sub
    程序运行后,单击窗体,则输出结果是

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

答案D

解析 本题是一个二重循环,而且内循环次数根据外循环的循环变量而定。内循环完成累加,内循环结束后将累加和乘到p中保存起来。在4次外循环中分别累乘的是1、4、10、20。
转载请注明原文地址:https://kaotiyun.com/show/UQGp777K
0

最新回复(0)