下列程序在运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click() Dim x(10) For i=1 To 10 x(i)=10-i

admin2019-03-14  23

问题 下列程序在运行时输出的结果是(    )。
    Option Base 1
    Private Sub Form_Click()
    Dim x(10)
         For i=1 To 10
             x(i)=10-i+1
         Next i
         For i=10 To1 Step-2
             Print x(i)
         Next i
    End Sub

选项 A、1 3 5 7 9   
B、9 7 5 3 1
C、1 2 3 4 5 6 7 8 9 10   
D、10 9 8 7 6 5 4 3 2 1

答案A

解析 本题考查数组元素的赋值。数组x元素的下标从1到10,元素分别为:10-下标+1(也就是10 9 8 7 6 5 4 3 2 1)。循环结束后,从高下标端输出偶数下标的元素。
转载请注明原文地址:https://jikaoti.com/ti/sMm0FFFM
0

最新回复(0)