问题
单项选择题
以下程序的输出结果是( )。
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 to3
p(i)=a(I*j)
Next j
For I=l to 3
k=k+ p (I)*2
Next I
Print k
End Sub
A．33
B．28
C．35
D．37
答案
参考答案：A
解析：此题中共定义了两个数组：a(0，p(0，共用到了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。