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

admin2020-02-27  27

问题 在窗体上画一个命令按钮(Name属性为Commandl),然后编写如下事件过程:
Private Sub Command l_Click(     )
Dim a(10)As Interger,p(3)As Interger
K=5
For i=1 To 10
a(i)=i
Next i
For i=l To 3
p(i)=a(i*i)
Next i
For i=l To 3
k=k+p(i)*2
Nexti
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/PxTp777K
0

最新回复(0)