单项选择题

下列程序运行时输出的结果是( )。 Option Base 1 Const a=10 Private Sub Form_Click() Dim x(a) As Integer k=-1 For i=1 To a x(i)=ik 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

<上一题目录下一题>

热门试题

单项选择题

单项选择题

下列程序运行时输出的结果是( )。 Option Base 1 Const a=10 Private Sub Form_Click() 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