[单项选择题] 以下程序的输出结果是D) 9 12 Option base 1 Private Sub Command1_Click() Dim s(10),p(3)As Integer k=5 For i=1 To 10 a(i)=i Next i For i=1 To 3 p(i)=a(i*i) Next I For i=1 To 3 k=k+ p(i)*2 Next i Print k End sub
A.33
B.28
C.35
D.37
参考答案:
A问题解析:
解析无
[单项选择题] 以下程序的输出结果是D) 9 12 Option base 1 Private Sub Command1_Click() Dim s(10),p(3)As Integer k=5 For i=1 To 10 a(i)=i Next i For i=1 To 3 p(i)=a(i*i) Next I For i=1 To 3 k=k+ p(i)*2 Next i Print k End sub
参考答案:
A问题解析:
解析无