问题
单项选择题
下列程序运行时输出的结果是
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循环给每个数组成员赋值。