有程序:INTEGERM(5,5)L=0DO40J=1,5DO40K=1,5M(J,K)=K40CONTINUEDO10I=1,5N=1IF(MOD(I,2).EQ.0)N=2DO10J=N,5,2L=L+M(I,J)10CONTINUEWRITE(*,20)L20FORMAT(2X,‘L=’,I3)END此程序运行的结果为:()A、L=36B、L=39C、L=54D、L=42
有程序:INTEGERM(5,5)L=0DO40J=1,5DO40K=1,5M(J,K)=K40CONTINUEDO10I=1,5N=1IF(MOD(I,2).EQ.0)N=2DO10J=N,5,2L=L+M(I,J)10CONTINUEWRITE(*,20)L20FORMAT(2X,‘L=’,I3)END此程序运行的结果为:()
- A、L=36
- B、L=39
- C、L=54
- D、L=42
相关考题:
数据库应用程序中,往往需要在屏幕上画出一个方框,下列( )命令可实现此功能。A.@5,5 TO 7,10B.@20,5 TO 10,5C.@5,5 TO 5,20 DOUBLED.@5,5 TO 5,20
int x=0;int y=10;do{l3.y--;++x;}while(x5);System.out.print(x+,+y);What is the result?() A.5,6B.5,5C.6,5D.6,6
有下列程序: main() { int x=5; do {printf("%d",x-=4);} while(!(--X)); } 程序的输出结果是( )。A.1B.20C.1-4D.死循环
有以下程序 程序运行后的输出结果是( )。A.6,4,3,2B.6,2,l,l,C.1,1,2,6,SXB 有以下程序程序运行后的输出结果是( )。A.6,4,3,2B.6,2,l,l,C.1,1,2,6,D.2,3,1,6,
【程序说明】 统计2~M中有多少个素数(只能被1或自身整除的整数称为素数)。【程序】SET TALK OFFCLEARINPUT “M=” TO MS=0(10)IF SS(I)S=S+1?? STR (1,5)ENDIFENDFOR? STR(5,5)SET TALK ONFUNC SS(11)FOR J=2 TO X-1(12)EXITENDIFENDFORIF J=XRETU .T.ELSE(13)ENDIFENDFUNC(10)A.DO WHILE I<MB.FOR I=2 TO M/2C.FOR I=M TO 1 STEP -1D.FOR M=I TO 0 STEP-1
有下列程序: main() { int x=5; do {printf("%d",x-=4);} while (!(--x)); } 程序的输出结果是( )。A.1B.20C.1 4D.死循环
阅读下列FORTRAN77程序: INTEGER A(4,5) DATA A/5*1,5*2,5*3,5*4/ M=0 DO 10 K=1,4 10 M=M+A(K,K+1) WRITE(*,*)M END 上述程序运行后,输出的M值为( )。A.8B.9C.10D.11
有程序:INTEGERM(3,3)DATAM/1,2,3,4,5,6,7,8,9/DO10I=1.3DO10J=1,3K=M(I,J)M(I,J)=M(J,I)M(J,I)=K10CONTINUEWRITE(*,100)((M(I,J),J=1,3),I=1,3)100FORMAT(1x,3I2)END此程序执行后的结果为:()A、1;4;7;2;5;8;3;6;9B、1;2;3;4;5;6;7;8;9C、9;6;3;8;5;2;7;4;1D、7;8;9;4;5;6;1;2;3
有程序:INTEGERM(3,4)DATAM/4*-1,4*-2,4*-3/S=0DO10I=1.310S=S+M(I,I+1)DO20I=4,2,-120S=S-M(I-1,I)WRITE(*,*)SEND上面程序的运行结果为:()A、0.0B、-1.0C、-2.0D、-6.0
单选题int x=0; int y=10; do{l3.y--; ++x; }while(x5); System.out.print(x+","+y); What is the result?()A5,6B5,5C6,5D6,6
单选题有程序:INTEGERM(5,5)L=0DO40J=1,5DO40K=1,5M(J,K)=K40CONTINUEDO10I=1,5N=1IF(MOD(I,2).EQ.0)N=2DO10J=N,5,2L=L+M(I,J)10CONTINUEWRITE(*,20)L20FORMAT(2X,‘L=’,I3)END此程序运行的结果为:()AL=36BL=39CL=54DL=42
单选题有程序:INTEGERM(3,3)DATAM/1,2,3,4,5,6,7,8,9/DO10I=1.3DO10J=1,3K=M(I,J)M(I,J)=M(J,I)M(J,I)=K10CONTINUEWRITE(*,100)((M(I,J),J=1,3),I=1,3)100FORMAT(1x,3I2)END此程序执行后的结果为:()A1;4;7;2;5;8;3;6;9B1;2;3;4;5;6;7;8;9C9;6;3;8;5;2;7;4;1D7;8;9;4;5;6;1;2;3