当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim a(1 To 10) Dim p(l To 3) k=5 For i = 1 To 10 a(i)= i Next i For i = 1 To 3p(i)= a(i * i) Next i For i = I To 3k = k + p(i)* 2Next i Print k End Sub 程序运行后,单击命令按钮,输出结果是 【13】 。

  

参考答案:

33

  参考解析

[评析]观察程序,通过第一个以i为循环变量的循环,给数组a()进行赋值,数组a()中的各个元素的值就是其下标值。通过第二个以i为循环变量的循环,给数组p()进行赋值:i=1,p(i)=a(i*i),p(1)=a(1)=1i=2,p(i)=a(i*i),p(2)=a(4)=4i-3,p(i)=a(i*i),p(3)=a(9)=9通过第三个以i为循环变量的循环,得到变量k的值:i=1,k=k+p(i)*2=5+p(1)*2=7i=2,k=k+p(i)*2=7+p(2)*2=15i=3,k=k+p(i)*2=15+(3)*2=33最终输出结果是:33。

微信端