A.100
B.9 1
C.10 1
D.90
[单选题]下列程序段的运行结果是( )。Sub sele()D.im n As Integeri=21:n=3D.o While i>ni=i-nLoopPrint iE.nd SubA.2B.4C.5D.3
[单选题]下列程序段运行后,其运行结果是( )。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(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 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 i As Integer,X As Integer x=0 For i=20 To 1 Step -2 x=x+i/5 Next Print x 后,x的值为______。A. 16B.17C.18D.19
[单选题]执行以下程序段后,x的值为( )。 Dim x As Integer,i As Integer x=0 For i=20 To 0 Step -2 x=x+i/5 Next iA.16B.17C.18D.19
[单选题]下列程序段的执行的结果是 Dim a(10),b(10) i=3 For j=1 To 5 a(j) =j b(i) =2 * i + j Next j Print b(i);a(i)A.11 3B.3 15C.3 11D.15 3
[单选题]有如下程序段: Dim I As Integer I=Int(-3.25)执行后,I的返回值是A.-3B.-4C.3D.3.25
[单选题]以下程序段运行的结果是______。 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 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