[单选题]

以下程序段运行的结果是______。Dim a(-1 To 5) As BooleanDim flag As Booleanflag = FalseDim i As IntegerDim j As IntegerDo Until flag = True For 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 If NextLoopPrint j

A.20

B.7

C.35

D.8

参考答案与解析:

相关试题

以下程序段运行的结果是 ______。Dim a(£­1 To 5)As Boo

[单选题]以下程序段运行的结果是 ______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For 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 If Next Loop Print jA.20B.7C.3

  • 查看答案
  • 以下程序段运行的结果是:_______。Dima(£­1 To 5)As Boo

    [单选题]以下程序段运行的结果是:_______。 Dima(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For 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 If Next Loop Print jA.20B.7C.3

  • 查看答案
  • 以下程序段运行的结果是______。Dim a(£­1 To 5)As Bool

    [单选题]以下程序段运行的结果是______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For i=-1 To 5 j=j+l If a(i)=False Then a(i)=True Exit For End If If i=5 Then flag=True End If Next Loop Print jA.20B.7C.35

  • 查看答案
  • 以下程序段运行的结果是______。Dim a(~1 To 5)As Boole

    [单选题]以下程序段运行的结果是______。 Dim a(~1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For 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 If Next Loop Print jA.20B.7C.35

  • 查看答案
  • 以下程序段运行的结果是: ______。Dim a(£­1 To 5)As Bo

    [单选题]以下程序段运行的结果是: ______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For 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 If Next Loop Print jA.20B.7C.

  • 查看答案
  • 以下程序段运行的结果是: ______。Dim a(£­1 To 5)As Bo

    [单选题]以下程序段运行的结果是: ______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For 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 If Next Loop Print jA.20B.7C.

  • 查看答案
  • 以上程序段运行的结果是:______. Dim a(£­1 To 5) As B

    [单选题]以上程序段运行的结果是:______. Dim a(-1 To 5) As Boolean Dim flag As Boolean flag = False Dim i As Integer Dim j As Integer Do Until flag = True For 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 If Next Loop Prin

  • 查看答案
  • 以下程序段运行的结果是______。Dima(£­1 To 5)As Boole

    [单选题]以下程序段运行的结果是______。 Dima(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For 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 If Next Loop Print jA.20B.7C.35D

  • 查看答案
  • 以下程序段的执行结果是 ______。Dim A(3, 3)For m = 1

    [单选题]以下程序段的执行结果是 ______。 Dim A(3, 3) For m = 1 To 3 For n = 1 To 3 If n = m Or n = 3 - m + 1 Then A(m, n) =m + n Else A(m, n) = 0 End If Next n Next m For m = 1 To 3 For n = 1 To 3 Print A(m, n); Next n Print Next mA. 1 1 1 1 1 1 1 1 1B.2 0 4 0 4 0 4 0 6C

  • 查看答案
  • 下列程序段运行后,其运行结果是( )。Dim a(3) As Integer,

    [单选题]下列程序段运行后,其运行结果是( )。D.im a(3) As Integer, b(3) As IntegerF.or k = 0 To 3a(k) = k*k +kb(k) = a(k)-kNext kPrint a(2) + b(1)A. 5B. 6C. 7D. 8

  • 查看答案
  • 以下程序段运行的结果是______。Dim a(£­1 To 5) As Boo