运行下列程序,在立即窗口显示的结果是Private Sub Command0_Click()Dim I As Integer,J As IntegerFor I=2 To 10For J=2 To I/2If I mod J=0 Then Exit ForNext JIf J>sqr(I) Then Debug.Print I;Next IEnd SubA.1 5 7 9B.4 6 8C.3 5 7 9D.2 3 5 7

题目

运行下列程序,在立即窗口显示的结果是

Private Sub Command0_Click()

Dim I As Integer,J As Integer

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


相似考题
更多“运行下列程序,在立即窗口显示的结果是Private Sub Command0_Click()Dim I As Integer,J As Integ ”相关问题
  • 第1题:

    以下程序运行后的输出结果是【】。include main(){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

  • 第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题:

    试题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

  • 第4题:

    有下列程序:

    #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,不符合循环,退出。

  • 第5题:

    运行下列程序:

    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