2. 计算机
  3. 有如下程序： 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(

有如下程序： 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  28
问题 有如下程序：
    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://jikaoti.com/ti/xHm0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)