下列程序执行后，其输出结果为( )。 Dim a(5) For i=0 To

问题单项选择题

下列程序执行后，其输出结果为( )。
Dim a(5)
For i=0 To 4
a(i)=i+1
m=i+1
If m=3 Then a(m-1)=a(i-2)Else a(m)=a(i)
If i=2 Then a(i-1)=a(m-3)
a(4)=i
Print a(i);
Next i

A．1 1 1 4 4

B．1 2 3 4 1

C．1 2 1 4 4

D．1 1 1 4 1

答案

参考答案：C

解析：本题考查数组元素的赋值。数组a在循环中为数据赋值。循环变量i从0到4，步长为1。如果i等于2，则将a(0)的值赋给a(2)；如果m等于3，则将a(0)的值赋给a(1)。因此数组元素的值为：1 2 1 4 4。