问题 单项选择题

设执行以下程序段时依次输入2,4,6,执行结果为()。  Dim a(4)As Integer  Dim b(4)AS Integer  For k=0 To 2    a(k+1)=Val(InputBox("Enter data:"))    b(3 - k) =a(k + 1)  Next k  Print b(k)

A.2

B.4

C.6

D.0

答案

参考答案:A

解析:此程序段开始声明了两个整型数组a和b,其长度均为4。程序通过For…Next语句为其赋值,a(k+1)=Val(InputBox("Enter data:")),b(3-k)=a(k+1)。  当k=0时,输入2,a(1)=b(3)=2  当k=1时,输入4,a(2)=b(2)=4  当k=2时,输入4,a(3)=b(1)=6  当k=3时,中断循环,执行Print语句,即要求输出b(k)的值,而k的当前值为3,即 要输出的值是b(3)的值为2。

选择题
单项选择题