问题
单项选择题
下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x(10) As Integer，y(5) As Integer For i=1 to 10 x(i) =10-i+1 Next For i=1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i=1 to 5 Print y(i) Next End Sub
A．3 7 11 45 19
B．19 15 11 7 3
C．1 3 5 7 9
D．不确定的值
答案
参考答案：B
解析： 本题考查数组的定义和赋值。题中定义了数组x(10)和y(5)，并通过For循环给每个数组成员赋值。