![[单项选择题] 以下程序段运行的结果是______。 Dim a(～1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Inte](http://www.mshxw.com/aiimages/31/257918.png "[单项选择题] 以下程序段运行的结果是______。 Dim a(～1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Inte")
[单项选择题] 以下程序段运行的结果是______。 Dim a(～1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=TrueFor i=-1 To 5 j=j+1 If a(i)=False Then a(i)=True Exit For End If If i=5 Then flag=True End IfNext Loop Print j
A．20
B．7
C．35
D．8
参考答案：
C问题解析:
[评析] 该程序段的作用是给数组a的每个数组元素赋值True，具体实现的方式为： 每次从数组a的第一个元素开始判断，该元素是否为False，如果是，则令此元素为True，然后跳出循环，重新从数组a的第一个元素开始判断；如果当前元素不为False，则判断下一个元素。因此语句j=j+1将执行1+2+3+4+5+6+7=28次，即j=28。然后再遍历一遍数组a的所有元素，最后结束程序段。所以j最终的值是：j=28+7=35。
