在下面的程序中,要求循环体执行四次,请填空。
Private Sub Commandl_Click()
x=1
Do While【 】
x=x+2
Loop
End Sub
第1题:
阅读以下程序:
Private Sub Form_click()
Dim k, n, m As integer
n = 20
m = 1
k = 1
Do While k <= n
m=m+2
k = k + 1
Loop
Print m
End Sub
单击窗体程序的执行结果是【 】。
第2题:
此题为判断题(对,错)。
第3题:
设有如下代码:
x=0
Do
x=x+1
Loop While x>=______
运行程序,要求循环体执行4次后结束循环,请在空白处填入适当语句使程序完整。
第4题:
执行下面的程序段,x的值为 Private Sub Commandl_Click() For i=1 To 5 a=a+i Next i x=Val(i) MsgBox x End Sub
A.5
B.6
C.7
D.8
第5题:
当执行以下程序段时,( )。 x=-l: do{x=x*X;)while(!x);
A. 循环体将执行一次
B.循环体将执行两次
C.循环体将执行无限次
D.系统将提示有语法错误
第6题:
在下面的程序中,要求循环体执行四次,请填空。
Private Sub Command1 _ Click()
x=l
Do While【 】
x=x+2
Loop
End Sub
第7题:
下面的程序输出结果是______。 main() { int x=3; while(!(--x)) printf("%d\n",x-=2); }
A.不执行循环体
B.1
C.0
D.是死循环
第8题:
单击命令按钮,下列程序的执行结果是 Private Sub Blck (x As Integer) x = x * 2 + l If x <6 Then Call Blck(x) End If x = x * 2 + 1 Print x; End Sub Private Sub Commandl_Click() Blck 2 End Sub
A.23 47
B.10 36
C.22 44
D.24 50
第9题:
单击命令按钮时,下列程序的执行结果是 Private Sub Commandl_Click( ) BT 4 End Sub PriVate Sub BT(x As Integer) X=X * 2 + 1 If x <6 Then Call BT(x) End If X=x * 2 Print x; End Sub
A.15
B.16
C.17
D.18
第10题:
以下程序段中循环体的执行次数是()。 x=10; y=0; do{ y+=2; x-=2+y; }while(x>=0);
第11题:
有语句“var x=0;while()x+=2;”,要使while循环体执行10次,空白处的循环判定式应写为()。
第12题:
1
2
3
4
第13题:
在下面的程序中,要求循环体执行四次,请填空。
Private Sub Command1_Click()
x=1
Do While 【 】
x=x+2
Loop
End Sub
第14题:
设有如下代码:
x=0
Do
x=x+1
Loop While x>=( )
运行程序,要求循环体执行4次后结束循环,在空白处填入适当语句。
第15题:
设有以下的循环:
X=1
DO
X=X+2
LOOP UNTIL 【 】
运行程序,要求执行三次循环体后就结束循环,请填空补充完整。
第16题:
下面的程序执行时,可以从键盘输入一个正整数,然后把该数的每位数字按逆序输出。例如:输入7685,则输出5 8 6 7;输人1000,则输出0 0 0 1。请填空。 Private Sub Command1_Click Dim x As Integer X=InputBox(“请输入一个正整数”) While x> 【11】 Print x Mod 10; x=x\10 Wend Print 【12】 End Sub
第17题:
有如下语句序列:
int x=-10;while(++x){}
运行时while循环体的执行次数为______。
第18题:
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序: Public x As Integer Private Sub Commandl_click() x=10 Call s 1 Call s 2 MsgBOx x End Sub Pfivate Sub s1() x=x+20 End Sub Private Sub
A.10
B.30
C.40
D.50
第19题:
下列程序段中循环体的执行次数是______。 int x=-12; while (x=0) x=x+1;
A.While循环执行12次
B.循环体语句执行一次
C.循环是死循环
D.循环体语句一次也不执行
第20题:
以下能够正确计算n!的程序是( )。
A.Private Sub Commandl_C1ick()
B.hiVate Sub Commandl_C1ick() n=5:x=1 n=5:x=1:i=1 DO DO X=x*1 X=X*1 i=i+1 i=i+1 Loop while i<n Loop While<n Print x Ptinte x End Sub End Sub
C.Private Sub Commandl_Click ()
D.Pdvate Sub Commandl C1ick() n=5:X=1:i=1 n=5=:x=1:i=1 DO DO X=X*1 X=X*1 i=i+1 i=i+1 Loop While i>n Print x Print x End Sub End Sub
第21题:
设有下列循环:
x=1
Do
x=x+2
Print x
Loop Until【 】
要求程序运行时执行3次循环体,请填空。
第22题:
有以下程序段,其输出结果是()int x=3;while((--x)==0){Console.Write("{0}/t",x-=2);}
第23题:
不执行循环体
1
0
死循环