下列程序段的循环结构执行后,i的输出值是_______。 Dim y as Integer For i = 1 To 10 Step 2 y = y + i Next i Print iA.25B.10C.11D.18

下列程序段的循环结构执行后,i的输出值是_______。 Dim y as Integer For i = 1 To 10 Step 2 y = y + i Next i Print i

A.25

B.10

C.11

D.18


参考答案和解析
C

相关考题:

执行以下程序段a$="abbacddcba"For i=6 To 2 Step -2X=Mid(a,i,i)Y=Left(a,i)z=Right(a,i)z=UCase(X Y z)Next iPrint z输出结果为( )。A.ABAB.BBABBAC.ABBABAD.AABAAB

执行以下程序段 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

下列程序段的结果为 ______。 A= "ABBACDDCBA" For I= 6 To 2 Step-2 X=Mid(A,I,I) Y=Left(A,I) Z=Right(A,I) Z=X Y Z Next I Print ZA.ABAB.AABAABC.BBABBAD.ABBABA

下列程序段的执行结果为 ______。 Dim m(3,3)As Integer Dim i As Integer Dim j As Integer Dim x As Integer For i=1 To 3 m(i,i)=i Next For i=0 To 3 For j=0 To 3 x=x+m(i,j) Next Next Print xA.3B.4C.5D.6

列程序段的循环结构执行后,i的输出值是( )For i=1 To 10 Step 2y=y+iNext iPrint iA.25B.10C.11D.因为y的初值不知道,所以不确定

设有如下程序:Private Sub Form_Click()Dim i As Integer,x As String,Y As Stringx=”ABCDEFG”For i=4 To 1 Step-1y=Mid(x,i,i)+yNext iPrint yEnd Sub程序运行后,单击窗体,输出结果为A.ABCCDEDEFGB.AABBCDEFGC.ABCDEFGD.AABBCCDDEEFFGG

执行下列程序段后,x的值为______。Dim x As Integer, i As Integerx=0For i=20 To 1 Step -2x=x +i\5Next i

设有如下程序: Private Sub Form. Click( ) Dim i As Integer,x As String,y As String x="ABCDEFG" For i=4 To 1Step-1 y=Mid(X,i,i)+y Next i Print y End Sub 程序运行后,单击窗体,输出结果为( )。A.ABCCDEDEFGB.AABBCDEFGC.ABCDEFGD.AABBCCDDEEFFGG

有如下程序: Private Sub Commandl_Click( ) Dim i As Integer For i=1 To 2 DS Next i End Sub Sub DS( ) Dim x As Integer,m As String Static y,n X=X + 1 y=y + 1 m=m "*”:n=n"#" Print x,y,m,n End Sub 程序运行后,输出的结果是A.1 1 * #B.1 1 * #C.1 1 * # 1 1 * # 1 2 * #D.1 1 * # 1 1 * ## 1 2 * ##

执行下列程序后,变量a的值为 ( ) Dim i As Integer Dim a As Integer a=0 For i=l To 100 Step 2 a=a+l Next iA.1B.10C.50D.100

执行以下程序段 a$="abbacddcba" For i=6 To 2 Step-2 X=Mid(a,i,i) Y=Left(a,i) Z=Right(a,i) z=UCase(XYz) Next i Print z 输出结果为( )A.ABCB.BBABBAC.ABBABAD.AABAAB

下列程序段的执行结果为 a="ABBACDDCBA" For I=6 To 2 Step-2 x=Mid(a,I,I) y=Leh(a,I) z=Right(a,I) z=x y z Next I Print zA.ABAB.AABAABC.BBABBAD.ABBABA

下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x(10) As Integer,y(5) As Integer For i=1 to 10 x(i)=10-i+1 Next For i=1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i=1 to 5 Print y(i) Next End SubA.3 7 11 45 19B.19 15 11 7 3C.1 3 5 7 9D.不确定的值

执行以下程序段后,x的值为______。Dim x As Integer,i As Integerx=0For i=20 To 1 Step -2x=x+i\5Next i

执行以下程序段 a$ ="abbacddcba" For i = 6 To 2 Step - 2 X = Mid(a, i,i) Y=Left(a, i) z=Right(a,i) z=UCase(X Y Z) Next i Print z 输出结果为A.ABCB.BBABBAC.ABBABAD.AABAAB

有如下事件过程: Private Sub Commaild1_Click( ) Dim i As Integer For i =1 To 2 DC Next i End Sub Sub DC( ) Dim x As Integer,m As String Static y,n x=x + 1 y=y + 1 m=m"*":n=n "#" Print x,y,m,n End Sub 程序运行后,输出的结果是A.1 1 * # 1 1 * #B.1 1 * # 1 2 * #C.1 1 * # 1 1 * ##D.1 1 * # 1 2 * ##

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

下列程序段的结果为 A = "ABBACDDCBA" For i=6 To 2 Step -2 X = Mid(A,i,i) Y=Left(A,i) Z=Right (A,i) Z=X Y Z Next Print ZA.ABCB.AABAABC.BBABBAD.ABBABA

程序段如下: Dim i As Integer,s As Integer For i=4 To 1 Step-1 s=s+i Next i Print s,i执行的结果是( )。A.10 0B.9 1C.10 1D.9 0

执行以下程序段 a$=“abbacddcba” For i=6 To 2 Step-2 X=Mid(a,i,i) Y=Left(a,i) z=Right(a, i) z=Ucase(X Y z) Next i Print z 输出结果为A.ABAB.BBABBAC.ABBABAD.AABAAB

下列程序运行时输出的结果是 Option Base 1Private Sub Form_Click()Dim x(10) As Integer,y(5) As IntegerFor i=1 to 10x(i) =10-i+1NextFor i=1 to 5y(i)=x(2*i-1)+x(2*i)NextFor i=1 to 5Print y(i)NextEnd SubA.3 7 11 45 19B.19 15 11 7 3C.1 3 5 7 9D.不确定的值

下列程序段的结果为_______。 A="ABBACDDCBA" For I=6 To 2 Step -2 X=Mid(A,I,I) Y=Left(A,I) Z=Right(A,I) Z=X Y Z Next I Print ZA.ABAB.AABAABC.BBABBAD.ABBABA

程序代码如下,当单击窗体上的Command1控件时,窗体上输出的结果是( )。 Private Sub Command1_Click() Dim Y As Integer,I As Integer Dim A(7)As Integer Y=18:I=0 Do A(I)=Y Mod 2 I=I+1 Y=Y\2 Loop Until Y<1 For j=I-1 To 0 Step-1 Print A(j); Next j End SubA.1 0 0 0B.1 0 0 1 0C.0 0 1 1 0D.1 0 1 0 0

设有如下程序: Private Sub Form. Click( ) Dim i As Integer,x As String,y As String x=ABCDEFGFor i=4 To 1Step-1y=Mid(X,i,i)+yNext iPrint yEnd Sub程序运行后,单击窗体,输出结果为( )。A.ABCCDEDEFGB.AABBCDEFGC.ABCDEFGD.AABBCCDDEEFFGG

下列程序段的结果为______。 A="ABBACDDCBA" For I=6 To 2 Step-2 X=Mid(A,I,I) Y=Left(A,I) Z=Right(A,I) Z=XYZ Next I Print ZA.ABAB.AABAABC.BBABBAD.ABBABA

下列程序段的执行结果为______。 Dim m(3,3)As Integer Dim i As Integer Dim j As Integer Dim x As Integer For i=1 To 3 m(i,i)=i Next For i=0 T0 3 For j=0 To 3 x=x+m(i, j) Next Next Print xA.3B.4C.5D.6

以下程序段的作用是首先按降序输入10个数到数组Y的前10个元素中,又输入一个YO插入到数组Y中,插入YO后Y中的数据仍按降序排列。请补充完该程序______。Dim Y(1 To 11)For i =1 To 10Y(i) = Val(InputBox(“请输入Y(i):”))Next iX = Val(InputBox (“请输入x:”))For i = 10 To 1 Step -1If【 】ThenY(i + 1) = XExit ForEnd IfY (i + 1) =Y(i)Next i'Print Y(10)For i =1 To 11Print Y(i)Next I

列程序段的循环结构执行后,i的输出值是() For i=1 To 10 Step 2 y=y+i Next i Print iA、25B、10C、11D、因为y的初值不知道,所以不确定