有如下程序: Private Sub Form_Click() Dim i As Integer,a(10)As Integer Dim p(3)A sInteger k=5 For i=0 To 10 a(i)=i Next i For i=0 To 2

admin2018-05-08  34

问题 有如下程序:
Private Sub Form_Click()
Dim i As Integer,a(10)As Integer
Dim p(3)A sInteger
k=5
For i=0 To 10
a(i)=i
Next i
For i=0 To 2
P(i)=a(i*(i+1))
Next i
For i=0 To 2
k=k+P(i)*2
Next i
Print k
EndSub
运行程序,单击窗体,输出结果是(    )。

选项 A、20
B、21
C、32
D、56

答案B

解析 本题考查利用For循环给数组元素赋值,在事件过程中定义了两个整型数组,a和p,第一个For循环,给a数组中的每个元素赋值,循环共执行11次,a(O)=Oa(1)=la(2)=2……a(10)=10;利用第二个For循环给数组p中的元素赋值,循环共执行了3次,p(0)=a(0*(0+1))=a(0)=0p(1)=a(1*(1+1))=a(2)=2p(2)=a(2*(2+1))=a(6)=6;利用第三个For循环对数组p中的元素进行计算并将累加结果保存到变量k中,循环执行3次,k=5+p(0)*2+p(1)*2+p(2)*2=5+4+12=21,故最终变量K的值为21,所以B选项正确。
转载请注明原文地址:https://jikaoti.com/ti/3Cy0FFFM
0

最新回复(0)