运行下列程序，在立即窗口显示的结果是（ ）。PrivateSub Command0_Click（ ）Dim I AsInteger，J AsIntegerFor I=2To 10For J=2 To1If I modJ=0 Then Exit ForNext JIfJ>sqr(I)Then Debug．Print I;Next IEnd SubA.1579B.468C.3579D.2357
题目
运行下列程序，在立即窗口显示的结果是（ ）。
PrivateSub Command0_Click（ ）
Dim I AsInteger，J AsInteger
For I=2To 10
For J=2 To1
If I modJ=0 Then Exit For
Next J
IfJ>sqr(I)Then Debug．Print I;
Next I
End Sub
A.1579
B.468
C.3579
D.2357
相似考题
参考答案和解析
此题考查for循环，当l=2T010，步长默认为l，当IF中判断ImodJ=0，则继续执行，所以结果为2，同理可得输出的结果为2，3，5，7，所以答案选择D。
更多“运行下列程序,在立即窗口显示的结果是( )。 PrivateSub Command0_Click( )Dim I AsInteger,J As ”相关问题
-
第1题：
在窗体上面1个名称为Command1的命令按钮，然后编写下列事件过程 Option Base 1 Private Sub，Command1 Click（ ） Dim a(5，5)ks Integer For i=1 To j For j=1 To 5 a(i，j)=(i+j)*5＼10 Next j Next i S=0 For i=1 To j s=s+a(i，i) Next i Print s End Sub 程序运行后，单击命令按钮，输出结果是（ ）。
A.15
B.13
C.11
D.9
正确答案：A
A。【解析】程序首先是利用两层For循环给数组进行赋值，其规律是：第一行，a(1，1)=1，a(1，2)=1，a(1，3)=2，a(1，4)=2，a(1，5)=3；第二行，a(2，1)=1，a(2，2)=2，a(2，3)=2，a(2，4)=3，a(2，5)=3；第三行，a(3，1)=2，a(3，2)=2，a(3，3)=3，a(3，4)=3，a(3，5)=4；……第五行，a(5，1)=3，a(5，2)=3，a(5，3)=4，a(5，4)=4，a(5，5)=5。可知正对角线上的是1、2、3、4、5。题中的S就是计算正对角线上的和。故应选择A。 -
第2题：
有下列程序：
#include<stdi0．h>
voidmain（ ）
{inti，j；
for(i=3；i>=1；i--)
{for(j=1；j<=2；j＋＋)printf(”％d”，i＋j)；
printf("＼n")；
}
}
程序的运行结果是（ ）。
A.234
B.432
345543
34
C.23
D.45
3434
2323
正确答案：D
D。【解析】本题考查for循环使用。当i=3时，j可以取1和2，i＋j分别是4和5，执行printf("＼n")换行，i--为2。当i=2时，j可以取1和2，i＋j分别是3和4，执行printf("＼n")换行，i--为1。当i=1时，J可以取1和2，i＋j分别是2和3，执行printf("＼n")换行，i--为0，不符合循环，退出。 -
第3题：
运行下列程序：
Private Sub Command1_Click( )
Dim A(10) As Integer
For i = 1 To 5
A(i) = i
A(i + 5) = i
Next i
For i = 1 To 10
s = s + A(i)
Next i
Debug.Print s
End Sub
单击按钮后，则在立即窗口内显示的结果是( )。
A.5
B.10
C.30
D.出错信息
正确答案：C
-
第4题：
以下程序运行后的输出结果是【】。includemain(){int i=10,j=0;do{j=j＋ i; i－－;}while 以下程序运行后的输出结果是【 】。
include ＜iostream.h＞
main()
{
int i=10,j=0;
do
{
j=j+ i; i--;
}
while(i＞2);
cout＜＜j;
}
正确答案：52
52 -
第5题：
有下列程序： #include<stdi0．h> voidmain（ ） {inti，j； for(i=3；i>=1；i--) {for(j=1；j<=2；j＋＋)printf(”％d”，i＋j)； printf("＼n")； } } 程序的运行结果是（ ）。
A.234
B.432 345543 34
C.23
D.45 3434 2323
正确答案：D
D。【解析】本题考查for循环使用。当i=3时，j可以取1和2，i＋j分别是4和5，执行printf("＼n")换行，i--为2。当i=2时，j可以取1和2，i＋j分别是3和4，执行printf("＼n")换行，i--为1。当i=1时，J可以取1和2，i＋j分别是2和3，执行printf("＼n")换行，i--为0，不符合循环，退出。 -
第6题：
试题35
运行下列程序，在立即窗口显示的结果是（）
Private Sub Command0_Click()
Dim I As Single ， J As Single
For I= 2 To 10
For J = 2 To I/2
If I mod J = 0 Then Exit For
Next J
If J > sqr (I) Then Debug .Print I;
Next I
End Sub
A．1 5 7 9
B．4 6 8
C．3 5 7 9
D．2 3 5 7
正确答案：D
试题35分析
If I mod J = 0 Then Exit For语句的功能是当I能被J除断的时候推出循环，I=2，J=2，I/2=1，J从2到1，不满足条件，退出；执行If J > sqr (I) Then Debug .Print I；因为J> sqr (I)，所以Then Debug .Print I ，此时I=2,；I=3，I/2=1.5，打印输入I；I=4，I mod J = 0。退出for循环，但J > sqr (I)也不成立；I=5，J=3，J > sqr (I)成立，输出5．．．。
试题35答案
D