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

admin2018-09-19  24

问题 有如下程序:
    Private Sub Form_Click()
    Dim i As Integer,a(10)As Integer
    Dim p(3)As Integer
    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
    End Sub
    运行程序,单击窗体,输出结果是(    )。

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

答案B

解析 本题考查利用For循环给数组元素赋值,在事件过程中定义了两个整型数组,a和p,第一个For循环,给a数组中的每个元素赋值,循环共执行11次,a(0)=0 a(1)=1 a(2)=2……a(10)=10;利用第二个For循环给数组p中的元素赋值,循环共执行了3次,p(0)=a(0*(0+1))=a(0)=0 p(1)=a(1*(1+1))=a(2)=2 p(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://kaotiyun.com/show/T9Fp777K
0

最新回复(0)