以下程序的输出结果是( )。 Option Base 1 Private Sub Command1 Click() Dim a(10),p(3)as Integer k=5 For I=1 to 10 a(i)=I

admin2009-05-20  29

问题 以下程序的输出结果是(    )。 Option Base 1 Private Sub Command1 Click()    Dim a(10),p(3)as Integer    k=5    For I=1 to 10        a(i)=I        Next I    For j=1 to 3        p(i)=a(I*j)        Next j    For I=1 to 3        k=k+p(I)*2    Next I    Print k End Sub

选项 A、33
B、28
C、35
D、37

答案1

解析 此题中共定义了两个数组:a(i),p(i),共用到了3次For循环。第1个For语句对数组a(i)赋值,a(1)…a(10)=1…10;第2个For语句,对p(1)=1,p(2)=4,p(3)=9;第3个For语句,计算k的值,3次循环分别得到:5,15, 33。答案为A。
转载请注明原文地址:https://jikaoti.com/ti/ojc0FFFM
0

最新回复(0)