网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

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

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 IntegerFor I=2 To 10For J=2 To I/2If I mod J=0 Then Exit ForNext JIf Jsqr(I) Then Debug.Print I;Next IEnd SubA.1 5 7 9B.4 6 8C.3 5 7 9D.2 3 5 7 ” 相关考题
考题 下面的程序的运行结果是__________func main() { i := 1j := 2i, j = j, ifmt.Printf("%d%dn", i, j)}

考题 下列程序的运行结果是 includeclass Location{private:int X.Y;public:void init(i 下列程序的运行结果是 #include<iostream.h> class Location{ private: int X.Y; public: void init(int=0,int=0); void valueX(int val){X=val;} int valueX( ){ return X;} void valueYA.5 0 6 4B.0 0 6 4C.5 0 6 2D.0 0 6 2

考题 运行下列程序,在立即窗口显示的结果是( )。 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 IfJsqr(I)Then Debug.Print I; Next I End SubA.1579B.468C.3579D.2357

考题 下面程序的运行结果是includemain(){char a[]="morning",t; int i,j=0; for(i=1;i 下面程序的运行结果是 #include<stdio.h> main() { char a[]="morning",t; int i,j=0; for(i=1;i<7;i++) if(a[j]<a[i])j=i; t=a[j]; a[j]=a[7]; a[7]=a[j]; puts[a];}A.mrgninrB.moC.moringD.morning

考题 以下程序运行后的输出结果是【】。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;}

考题 有下列程序:#includestdi0.hvoidmain( ){inti,j;for(i=3;i=1;i--){for(j=1;j=2;j++)printf(”%d”,i+j);printf(\n);}}程序的运行结果是( )。A.234B.43234554334C.23D.4534342323

考题 有下列程序: #includestdi0.h voidmain( ) {inti,j; for(i=3;i=1;i--) {for(j=1;j=2;j++)printf(”%d”,i+j); printf("\n"); } } 程序的运行结果是( )。A.234B.432 345543 34C.23D.45 3434 2323

考题 运行下列程序:Private Sub Command1_Click( )Dim A(10) As IntegerFor i = 1 To 5A(i) = iA(i + 5) = iNext iFor i = 1 To 10s = s + A(i)Next iDebug.Print sEnd Sub单击按钮后,则在立即窗口内显示的结果是( )。A.5B.10C.30D.出错信息

考题 试题35运行下列程序,在立即窗口显示的结果是()Private Sub Command0_Click()Dim I As Single , J As SingleFor 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