更多"下面的程序的运行结果是 a=1 b=1 Do a=a^"的相关试题:
[单项选择]下面程序运行后j的结果是( )。
i=1
j=0
Do
j=j+1
i=i+1
Loop Until i ＜ 5
A. 0
B. 4
C. 1
D. 5
[单项选择]下面程序段的运行结果是（ ）。
a=1
b=1
Do
a=a+1
b=b + 1
Loop Until b＞5
Print"k="；a；Spc(4)；"b="；b+a
A. k=7 b=14
B. k=6 b=6
C. k=4 b=8
D. k=6 b=12
[单项选择]下面程序段的运行结果是 a=1 b=1 Do a=a+1 b=b+1 Loop Until b＞5 Print"k="; a; Spc(4) ; "b="; b + a
A. k=7 b=14
B. k=6 b=6
C. k=4 b=8
D. k=6 b=12
[单项选择]
下面程序段的运行结果是（）。
INTEGER A(3,3)
DO 10 K=1,3
DO 10 L=1,3
10 A(K,L)=K*10+L
WRITE(*,'(1X,3I3)')A
END
A. 11 12 13
B. 11 21 31
C. 11 22 33
D. 11 12 13
[单项选择]下面程序运行结果是( )。 Private Sub Form_Click（ ） Dim x As Single,y As Single x=InputBox("请输入数据25"):y=InputBox("请输入数据10") Print x+y;InputBox("请输入数据25")+InputBox("请输入数据10") End Sub
A. _35_2510
B. 25102510
C. _35_35_
D. 2510_35_
[单项选择]下面程序运行后的输出结果是
Private Sub Command1_Click（ ）
For j=1 To 10
If j Mod 3＜＞0 Then a=a+j/3
Next
Print a
End Sub
A. 20
B. 10
C. 3
D. 9
[单项选择]下面的程序的运行结果是( )。
a=1
b=1
Do
a=a^2
b= b + 1
Loop Until b＞5
Print "k="；a；Spc(4)；"b="；b + a
A. Computer
B. 什么都没有
C. * * * * * * * *
D. 程序出错
[单项选择]下面程序段的运行结果是（）。
DO 1 I=1，10，2
1 K=K+1
PRINT *，K
END
A. 10
B. 8
C. 6
D. 5
[单项选择]下面程序运行后的结果是( )。 Private Sub Form_Click（ ） Dim s As Integer，k As Integer,i As Integer，n As Integer s=1 fori=1 to 3 forj=i to 3 for k=j to istep-1 s=s*k nextk,J,i print s End Sub
A. 6
B. 72
C. 144
D. 432
[单项选择]
下面程序段的运行结果是（）。
DO 1 I=1，10，2
1 K=K+1
PRINT *，K
END
A. 10
B. 8
C. 6
D. 5
[单项选择]下面程序段的运行结果是( )。
DO 10 I=1，5
S=0.0
IF(MOD(I，2).EQ.0)S=S+I
IF(MOD(I，3).EQ.0)S=S-I
10 CINTINUE
WRITE(*，*)S
END
A. 0.0
B. 1.0
C. 2.0
D. 3.0
[单项选择]下面程序段的运行结果是 a=1 b=1 Do a=a+1 b=b + 1 Loop Until b＞5 Print"k="；a；Spc(4)；"b="；b+a
A. k=7 b=14
B. k=6 b=6
C. k=4 b=8
D. k=6 b=12
