A-A+
下面程序：________Option Base 1Private Sub Command1_Click（)Dim a（10) p（3)As IntegerDim i k
问题详情
下面程序：________Option Base 1Private Sub Command1_Click() Dim a(10)，p(3)As Integer Dim i,k As Integer k=5 For i=1 To 10 a(i)=i Next For i=1 To 3 p(i)=a(i*i) Next For i=1 To 3 k=k+p(i)*2 Next Print kEnd Sub运行后的输出结果为________。
A．33
B．28
C．35
D．37
请帮忙给出正确答案和分析，谢谢！
