[单选题]

下列程序段的运行结果是( )。 Subsele() Dim n As Integer i=21:n=3 Do While i>n i=i-n Loop Print i End Sub

A.2

B.4

C.5

D.3

参考答案与解析:

相关试题

下列程序段的运行结果是()。Sub sele()Dim n As Integer

[单选题]下列程序段的运行结果是( )。Sub sele()D.im n As Integeri=21:n=3D.o While i>ni=i-nLoopPrint iE.nd SubA.2B.4C.5D.3

  • 查看答案
  • 下列程序段的运行结果是()。 Sub sele()Dim n As Intege

    [单选题]下列程序段的运行结果是( )。 Sub sele() Dim n As Integer i=21: n=3 Do While i > n i=i-n Loop Print i End SubA.2B.4C.5D.3

  • 查看答案
  • (12)下列程序段的运行结果是 Sub sele() Dim n As Inte

    [单选题](12)下列程序段的运行结果是 Sub sele() Dim n As Integer I=21:n=3 Do While i>n I=i-n Loop Print i End SubA.2 B.4 C.5 D.3

  • 查看答案
  • 下列程序段运行后,其运行结果是( )。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 M(10)Dim N(1

    [单选题]下列程序段执行后,执行的结果是______ 。 Dim M(10) Dim N(10) i=3 For j = 1 To 5 M(j) = j N(i) = 2 * i + j Next j Print N(i); M(i)A.12 4B.11 3C.3 11D.10 2

  • 查看答案
  • 以上程序段运行的结果是:______. 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

  • 查看答案
  • 以下程序段运行的结果是: ______。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 Boo

    [单选题]以下程序段运行的结果是______。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 jA.20B.7C

  • 查看答案
  • 以下程序段运行的结果是 ______。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

  • 查看答案
  • 下列程序段的运行结果是()。Subsele()Dim n As Integeri