[单项选择题] 以下程序段运行的结果是______。 Dim a(～1 To 5)As Boolean Dim flag As Boolean flag=

[单项选择题] 以下程序段运行的结果是______。 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。