运行下列程序段,结果是 For m=10 to 1 step 0 k=k+3 Next mA.形成死循环B.循环体不执行即结束循环C.出现语法错误D.循环体执行一次后结束循环
运行下列程序段,结果是 For m=10 to 1 step 0 k=k+3 Next m
A.形成死循环
B.循环体不执行即结束循环
C.出现语法错误
D.循环体执行一次后结束循环
参考答案和解析
A 当步长为0时,程序不执行。
相关考题:
执行下列程序段后,输出的结果是For k1=0 To 4y=20For k2=0 To 3y=10For k3=0 To 2y=y + 10Next k3Next k2Next k1Print y( )。A.90B.60C.40D.10
(20)运行下列语句后,输出的结果是 Option Base 1 Dim a i=1 A=Array(1,-2,9,0,-1,9) Do K=a(i) For m=10 To k Step -2 Next m Print n+m i=i+1 Loop While Abs(m+n)27A.3 27 -8 B.3 -8 27 C.-8 27 3 D.-8 3 27
请阅读程序: Private Sub Form. Click( ) m=1 For i=4To 1 Step-1 Print Str(m);m=m+1 For j=1 To i Print"*": Next j Print Next i End Sub 程序运行后,单击窗体,则输出结果是( )。A.1**** 2*** 3** 4*B.4**** 3*** 2** 1*C.**** *** ** *D.* ** *** ****
23 有如下程序段,该程序段循环的次数是______。 Dim i As Integer Dim j As Integer Dim k As Integer k=0 For i = 0 To 10 Step 3 For j = 1 To 5 If j > 3 Then k = k + 4: Exit For k=k+1 Print k Next j If i > 8 Then Exit For Next iA.9B.10C.11D.12
下列程序执行后,执行的结果是______ 。 Dim M(2) For i = 1 To 2 M(i) = 0 Next i k=2 For i = 1 To k For j = 1 To k M(j) = M(i) + 1 Print M(k): Next j Next IA.1234B.0123C.223D.2345
执行下列程序段后,输出的结果是 For k1 = 0 To 4 y =20 For k2 = 0 To 3 y=10 For 16 = 0 To 2 y=y+10 Next Next Next Print yA.90B.60C.40D.10
执行下列程序段后,输出的结果是( )。 Forkl=0 To 4 y=20 For k2=0 To 3 y=10 Fork3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print yA.90B.60C.40D.10
以下程序段的执行结果是 ______。 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.0 0 0 0 0 0 0 0 0D.1 0 1 0 1 0 1 0 1
下列程序段的执行结果是______ 。 k=0 For j=1 To 2 For i=1 To 3 k = i+ 1 Next i For i=1 To 7 k= k + 1 Next i Next j Print kA. 11B.10C.9D.8
运行下列语句后,输出的结果是( )。 Option Base 1 Dim a i=1 a=Array(l, -2, 9, 0, -1, 9) Do k=a(i) For m = 10 To k Step -2 n=k+m Next m Print n+m i=i+1 Loop While Abs(m+n) <> 27A.3 27-8B.3-8 27C.-8 27 3D.-8 3 27
下列命令按纽事件过程执行后,输出的结果是______ 。 private sub command_ click() for m+1 to 10 step 2 a=10 for n=1 to 10 step 2 a+a+2 next n next m print a end subA. 60B.50C.30D.20
运行下述语句后,输出的结果是( )。 Option Base 1 Dim a i=1 a = Array(1,-2,9,0,-1,9) Do k = a(i) For m = 10 To k Step -2 n=k+m Next m Print n + m i=i+1 Loop While Abs(m + n)<>27A.3 27-8B.3-8 27C.-8 27 3D.-8 3 27
下面程序的执行结果是( )。 Private Sub Command1Click( ) a=10 For k=1 To 5 Step-I a=a-k Next k Print a;k End SubA.-5 6B.-5 -5C.10 0D.10 1
某人设计了下列程序用于计算并输出5!(5的阶乘):Private Sub Command1_Click()t=0For k=5 To 2 Step -1t=t*kNext kPrint tEnd Sub执行程序时,发现结果是错误的。下列修改方案中能够得到正确结果的是_______A. 把t=0改为t=1B. 把For k=5 To 2 Step -1改为For k=5 To 1 Step -1C. 把For k=5 To 2 Step -1改为For k=1 To 5D. 把Next改为Next t
(31)运行下列程序段,结果是For m=10 to 1 step 0k=k+3Next mA)形成死循环B)循环体不执行即结束循环C)出现语法错误D)循环体执行一次后结束循环