在窗体上画一个命令按钮(Name属性为Command1),然后编写如下事件过程: Private Sub Command1_Click( ) Dim a(10)As Interger,p(3)As Interger K=5

admin2018-09-29  36

问题 在窗体上画一个命令按钮(Name属性为Command1),然后编写如下事件过程:
    Private Sub Command1_Click( )
    Dim a(10)As Interger,p(3)As Interger
    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
    Printk
    End Sub
    程序运行后,单击命令按钮,输出结果是(    )。

选项 A、35
B、28
C、33
D、37

答案C

解析 题中第一个循环功能是给数组a赋值,即a(1)=1、a(2)=2…;第二个循环功能是给数组p赋值,即p(1)=1、p(2)=4、p(3)=9;第三个循环是求K的值,即是将K值加上数组P所有元素的值,所以K=K+p(1)*2+p(2)*2+p(3)*2=33。
转载请注明原文地址:https://kaotiyun.com/show/TLFp777K
0

最新回复(0)