下面程序在调试时出现了死循环Private Sub Command1_Click()n=InputBox(“请输入一个整数”)DoIf n Mod 2=0 Thenn=n+1Elsen=n+2Else IfLoop Until n=1000End Sub下面关于死循环的叙述中正确的是( )。A.只有输入的n是偶数时才会出现死循环,否则不会B.只有输入的n是奇数时才会出现死循环,否则不会C.只有输入的n是大于1000的整数时才会出现死循环,否则不会D.输入任何整数都会出现死循环
下面程序在调试时出现了死循环
Private Sub Command1_Click()
n=InputBox(“请输入一个整数”)
Do
If n Mod 2=0 Then
n=n+1
Else
n=n+2
Else If
Loop Until n=1000
End Sub
下面关于死循环的叙述中正确的是( )。
A.只有输入的n是偶数时才会出现死循环,否则不会
B.只有输入的n是奇数时才会出现死循环,否则不会
C.只有输入的n是大于1000的整数时才会出现死循环,否则不会
D.输入任何整数都会出现死循环
相关考题:
下面程序在调试时出现了死循环 Private Sub Command1_Click() n=InputBox("请输入—个整数") Do Ifn Mod 2=0 Then n=n+1 Else n=n+2 End If Loop Until n=1000 End Sub 下面关于死循环的叙述中正确的是______。A.只有输入的n是偶数时才会出现死循环,否则不会B.只有输入的n是奇数时才会出现死循环,否则不会C.只有输入的n是大于1000的整数时才会出现死循环,否则不会D.输入任伺整数都会出现死循环
( 28 )下面程序在调试时出现了死循环Private Sub Command1_Click ()n=InputBox ( “ 请输入一个整数 ” )DoIf n Mod 2=0 Thenn=n+1Elsen=n+2Else IfLoop Until n=1000End Sub下面关于死循环的叙述中正确的是( )A )只有输入的 n 是偶数时才会出现死循环,否则不会B )只有输入的 n 是奇数时才会出现死循环,否则不会C )只有输入的 n 是大于 1000 的整数时才会出现死循环,否则不会D )输入任何整数都会出现死循环
( 9 ) 下面的程序执行时 , 可以从键盘输入一个正整数 , 然后把该数的每位数字按逆序输出 。 例如 : 输入 7685 ,则输出 5867 ,输入 1000 ,则输出 0001 。请填空。Private Sub Command1_Click()Dim x As Integerx=InputBox( “ 请输入一个正整数 ” )While x_ _[11] ___Print x Mod 10;x=x\10WendPrint__ [12] __End Sub
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a=InputBox("请输入一个整数") b=InputBox("请输入一个整数") Print a+b End Sub 程序运行后,单击命令按钮,在输入对话框中分别输入37和18,输出结果为A.3718B.55C.0D.a+b
在窗体上画一个命令按钮,然后编写如下事件过程。该程序运行后,单击命令按钮,在输入对话框中分别输入321和456,则输出结果为【 】。Private Sub Command1_Click()a=InputBox("请输入一个整数")b=InputBox("请再输入一个整数")Print a+bEnd Sub
下面程序的功能是从键盘输入—个大于100的整数m,计算并输出满足不等式1+22+32+42+…+n2<m的最大的n。请填空。Private Sub Command1_Click()Dim s,m,n As Integerm=Val(InputBox("请输入一个大于100的整数"))n=【 】s=0Do While s<mn=n+1s=s+n*nLoopPrint "满足不等式的最大n是";【 】End Sub
在窗体中添加一个命令按钮,然后编写如下代码:Private Sub Command1_Click()a=InputBox("请输入一个整数")b=InputBox("请输入一个整数")Print Val(a)+Val(b)End Sub程序运行后,单击命令按钮,在输入对话框中分别输入21和45,输出结果为【 】。
下面程序运行时,若输入395,则输出结果是( )。Private Sub Command1_Click( )Dim X%x=InputBox(请输入一个3位整数)Print x Mod 10,x\100,(x Mod 100)\10End SubA.3 9 jB.5 3 9C.5 9 3D.3 5 9
下面程序运行时,若输入395,则输出结果是_________。 Private Sub Command1_Click() Dim x% x=InputBox("请输入一个3位整数") Print x Mod 10,x100,(x Mod 100)10 End SubA.3 9 5B.5 3 9C.5 9 3D.3 5 9