单选题阅读下列FORTRAN程序: CHARACTER*10 A, B*6 DO 10 I=1,10 A(I:I)=' ' 10 COUNTINUE A(1:5)='ABCDE' B='FGHIJK' A(4:9)=B WRITE(*,100) A 100 FORMAT(1X,A) END 程序运行结果是()A ABCDEFGHIJB ABCDEGHIJKC ABCFGHIJKD BCDEFGHIJK
单选题
阅读下列FORTRAN程序: CHARACTER*10 A, B*6 DO 10 I=1,10 A(I:I)=' ' 10 COUNTINUE A(1:5)='ABCDE' B='FGHIJK' A(4:9)=B WRITE(*,100) A 100 FORMAT(1X,A) END 程序运行结果是()
A
ABCDEFGHIJ
B
ABCDEGHIJK
C
ABCFGHIJK
D
BCDEFGHIJK
参考解析
解析:
暂无解析
相关考题:
在执行完此程序段后,i,j值为 int i=1,j=10; do{ if(++i>j--)continue; }while(i<5);A.i=6 and j=5B.i=5 and j=5C.i=6 and j=4D.i=5 and j=6
下列程序段的输出结果是【】。 include void main() {inti=10,sum=0;do{sum=+sum+i;i=i 下列程序段的输出结果是【 】。include<iostream.h>void main(){int i=10,sum=0;do{sum=+sum+i;i=i-2;}while(i>=2);cout<<sum<<end1;}
执行下面的程序段后i和j的结果为 int i=1,j=10; do { if(i++>--j)continue; } while(i<5);A.i=6,j=5B.i=5,j=5C.i=6,j=4D.i=5,j=6
运行下列程序,显示的结果是( )。 PrivateSub Command34 Click( )i=0 Do i=i+1 LoopWhile i%10MsgBox i End SubA.0B.1C.10D.11
运行下面的程序I = 0DO WHILE I10IF INT(I/2)=I/2?"偶数"ELSE ?"奇数"ENDIFI=I+1ENDDO问语句?"奇数"被执行的次数是A.5B.6C.10D.11
运行下面的程序 I=0 DO WHILE I<10 IF INT (I/2)=I/2 ?“偶数” ELSE ?“奇数” ENDIF I=I+1 ENDDO 问语句?“奇数”被执行的次数是A.5B.6C.10D.11
以下程序的输出结果是( )。 include main() {int i=10,j=0; do {j=j+i; i--; }while(i>5 以下程序的输出结果是( )。 include<stdio.h> main() {int i=10,j=0; do {j=j+i; i--; }while(i>5); printf("%d\n",j); }
观察以下程序段:int i=1,j=10;do{if(i++>--j) continue;} while(i A. i=6 j=5B. i=5 j=5C. i=6 j=4D. i=5 j=6
阅读下列FORTRAN程序:DIMENSION M(6)READ(*,*)MDO 10 J=l,6 DO 10 K=J,6 IF(M(K)LTM(J))THEN N=M(K)M(K)=M(J)M(J)=N END IF 10 CONTINUEWRITE(*,100)(M(I),I=1,6)100 FORMAT(2X,614)END键盘输入10,7,9,2,1,3;程序运行后的输出结果是:A. 1 2 3 7 9 10B. 10 9 7 3 2 1C. 7 9 2 1 3 10D. 3 1 2 9 7 10
阅读以下FORTRAN程序:INTEGER X(7)DATA X/10,20,45,70,80,15,14/M/X(l)DO 10 1=2,7IF(X(I).GIM)THENM=X(I)K=1 END IF 10 CONTINUEN=X(K)X(K)=X(I)X(I)=NWRITE( *,100)(X(I),I=1,7)100 FORMAT(2X,713)END 程序运行的结果是:A. 10 20 45 70 80 15 14B. 14 20 45 70 80 15 10C. 80 20 45 70 10 15 14D. 20 45 70 80 15 14 10
阅读FORTRAN程序:READC*,*)I,J,K DO 10 N=l,2 I=I+J+K J=I+K+J K=I+J+K 10 CONTINUEWRITE(*,20)I,J,K 20 FORMAT(2X,315)END键盘输入1,0,0则程序运行后的输出结果是:A. 4 7 13B.2 3 4C. 1 1 2D. 6 9 15
阅读下列FORTRAN 程序: DIMENSION M(6) READ(*,*)M DO 10 J=1,6 DO 10 K=J,6 IF(M(K).LT.M(J))THEN N=M(K) M(K)=M(J) M(J)=N END IF10 CONTINUE WRITE(*,100)(M(I),I=1,6) 100 FORMAT(2X,614) END键盘输入10,7,9,2,1,3;程序运行后的输出结果是:(A)1 2 3 7 9 10 (B)10 9 7 3 2 1(C)7 9 2 1 3 10 (D)3 1 2 9 7 10
阅读下列FORTRAN77程序: INTEGER A(3,3) DATA A/1,2,3,4,5,6,7,8,9/ S=0.0 DO 10 I=1,3 J=MOD(I,3)+1 S=S+A(I,J) 10 CONTINUE WRITE(*,*)S END 上述程序运行后,输出的S值为( )。A.150B.120C.180D.240
阅读FORTRAN程序:OPEN(8,FILE=FILE2 DAT,STATUS=NEW)DO 10 I=1,3WEITE(8,(4I4)JI+I,J=1,4)10 CONTINUECLOSE(8)END程序运行后,数据文件FILE2,DAT的内容是:
阅读FORTRAN 程序 DIMENSION M(4,3) DATE M/-10,12,24,11,20,-15,61,78,93,30,44,-45/ N(M(1,1) DO 10I=1,4 DO 10J=1,3 IF (M(I,J).LT.N) THEN N=M(I,J) K1=I K2=J ENDIF10 CONTINUE WRITE(*,’(2x,314)’) N,K1,K2 END程序运行后的输出结果是:(A)93,3,1 (B)-10,1,1(C)-45,4,3 (D)78,3,2
下列循环能正常结束循环的是()。A、i=5:Do:i=i+1:Loop Until i<0B、i=1:Doi=i+2:Loop Until i=10C、i=10:Doi=i+1:Loop Until i>10D、i=6:Doi=i-2:Loop Until i=1
以下能正确计算1×2×3×…×10的程序段是()。A、do{i=1;s=1;B、do{i=1;s=0;s=s*i;s=s*i;i++;i++;}while(i=10);}while(i=10);C、i=1;s=1;D、i=1;s=0;do{s=s*i;do{s=s*i;i++;i++;}while(i=10);}while(i=10);
有程序:K=0DO10I=1,6,2DO10J=1,6,3IF(K.LT.I*J)K=I*J10CONTINUEWRITE(*,*)KEND此程序执行后的输出结果为:()A、18B、30C、25D、36
单选题下列程序执行后的输出结果为( )。 K=0 DO10I=1,6,2 DO10J=I,6,3 IF(I.EQ.J)THEN K=K+J ELSE K=K+1 ENDIF 10CONTINUE WRITE(*,*)K ENDA18B11C15D10
单选题以下程序段中,循环次数不超过10的是( )。Aint i=10;do{i=i+1;}while(i0);Bint i=int i=5;do{i+=1;}while(i0);Cint i=1;do{i+=2;}while(i!=10);Dint i=6;do{i-=2;}while(i!=1);
单选题阅读下列FORTRAN程序: DO I=4,2,-1 A=1.0 DO J=I,4,2 A=A+1.0 ENDDO ENDDO WRITE(*,*)A END 运行上述程序后,输出的A值为 ()A 5.0B 4.0C 3.0D 2.0
单选题阅读下列程序 INTEGER A(100),G READ(*,*)N,(A(I),I=1,N) DO 10 I=1,N-1 G=I DO 20 J=I+1,N IF(A(J).LT.A(G))THEN G=J ENDIF 20 CONTINUE K=A(I) A(I)=A(G) A(G)=K 10 CONTINUE WRITE(*,’(1X,10I2)’)(A(I),I=1,N) END 程序运行时输入的初始值是3,6,9,8,则运行结果是()A 6 9 8B 8 9 6C 6 8 9D 9 8 6
单选题有程序:K=0DO10I=1,6,2DO10J=1,6,3IF(K.LT.I*J)K=I*J10CONTINUEWRITE(*,*)KEND此程序执行后的输出结果为:()A18B30C25D36
单选题程序 character*(*)name name=’apple’ L=len(name) Do10I=1,L 10name(I:I)=char(Ichar(name(I:I))+I print*,name end 程序运行后输出结果为( )AAPPLEBbrspjCjpsrbDapple