问题
单项选择题
下列程序运行时输出的结果是( )。
Option Base 1
Const a=10
Private Sub Form_Click0
Dim x(a)As Integer
k=-1
For i=1 To a
x(i)=i*k
k=(-1)*k
Next i
For i=1 To 10
Print x(i)
Next i
End Sub
A．1 3 5 7 9 10
B．-1-3-5-7-9
C．-1 2-3 4-5 6-7 8-9 10
D．1-2 3-4 5-6 7-8 9-10
答案
参考答案：C
解析： 本题中两个For循环的作用分别为：为x数组元素赋值，在窗体上依次输出x数组元素的值。
其中，为x数组元素赋值时，有“x(i)=i*k”和“k=(-1)*k”两条语句。k的值每次都取自己的相反数，这样，x数组元素的符号每次都在变化，第1个元素是-1，第2个元素是2，第3个元素是-3，依次类推；最后输出x元素的值为-1 2-3 4-5 6-7 8-9 10。