单选题阅读下列程序  READ(*,*)K  WRITE(*,100)K  100 FORMAT(I5)  END  程序运行时输入初始值12345,那么显示结果是()A 2345B 12345C ****D *****

单选题
阅读下列程序  READ(*,*)K  WRITE(*,100)K  100 FORMAT(I5)  END  程序运行时输入初始值12345,那么显示结果是()
A

 2345

B

 12345

C

 ****

D

 *****


参考解析

解析: 暂无解析

相关考题:

阅读下列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

阅读FORTAN程序:READ(*,*)NDO10K=1,NS=S+K**210CONTINUEWRITE(*,100)S100FORMAT(2X,F8.0)END键盘输入5则程序运行后的输出结果是:A.35B.45C.65D.55

阅读以下FORTRAN程序:READ( *,* )MIF(M. LT. 100. AND. M. GT. 9f9?STOPK=M/100L=(M-K* 100)/10N=M—K*100—L*10MM=K+NWRITEO,(2X,I3))MM END键盘输入600,则程序的输出结果是:A. 8B. 3C. 7D. 6

阅读下列FORTRAN程序:MOIUH=N(5)+NdO)WRITE( *,‘(2X,15),)MQIUH ENDFUNCTION N(K)N=0DOIO J=1,K N=N+J 10 CONTINUE RETURN END程序运行后的结果是:A. 65B. 85C. 90D. 70

阅读下列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

阅读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

阅读以下FORTAN程序:K1=M(5)K2 = M(K1)K3=M(K1)+M(K2)K4=M(K1+K2+K3)WRITEC* ,100)K4 100 FORMAT(2X,K4=I3)ENDFUNCTION M(N)M=N+1 RETURN END 程序的输出结果是:A. K4=28B. K4=27C. K4=30D. K4=29

阅读下列FORTRAN程序:INTEGER X(7)DATA X/4,5,7,8,10,12,11/DO 10 K=1,7IF(MOD(X(K),2).NE.0)THENS=A+X(K)N=N+1END IF10 CONTINUET=S/NWRITE(*,20)S,T20 FORMAT(2X,3F6,1)END 程序运行后的输出结果是:(A)12.0 7.7(B)47.0 6.7(C)34.0 8.5(D)57.0 11.4

阅读以下FORTRAN程序 READ(*,*)M,N K=MOD(M,N) 10 IF(K.GT.0)THEN M=N N=K K=MOD(M,N) GOTO 10 END IF WRITE(*,*)N END 若运行以上程序时,由键盘输入25,11,则程序输出为( )。A.3B.2C.1D.0

阅读以下FORTRAN 程序:READ( *,*) MIF (M. LT. 100. AND. M. GT. 999) STOP K=M/100L=(M - K*100)/10 N= M - K* 100 - L* 10 MM= K + N WRITE( * ,,(2X,I3)')MM END键盘输入600,则程序的输出结果是:A. 8 B. 3 C. 7 D. 6

阅读FORTRAN程序:READ(*,*)NDO 10 K-1,NS=S+K**210 CONTINUEWRITE(*,100)S100 FORMAT(2X,F8,0)END键盘输入5则程序运行的输出结果是:(A)35(B)45(C)65(D)55

阅读下列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

阅读以下FORTRAN程序:K1=M(5)K2=M(K1)K3=M(K1)+M(K2)K4=M(K1+K2+K3)WRITE(*,100)K4100 FORMAT(2X;K4;I3)ENDFUNCTION M(N)M=N+1RETURNEND程序输出结果是:(A)K4=28(B)K4=27(C)K4=30(D)K4=29

阅读下列FORTRAN 程序: MQIUH=N(5)+N(10) WRITE(*,’(2X,15)’)MQIUH END FUNCTION N(K) N=0 DO 10 J=1,k N=N+J10 CONTINUE RETURN END程序运行后的结果是:(A)65 (B)85(C)90 (D)70

有程序:READ(*,50)SWRITE(*,100)S50FORMAT(1X,F7.3)100FORMAT(1X,F8.3)END执行此程序,由键盘输入123456789,则输出S的值为:()A、1234.576B、2345.678C、345.678D、*******

有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END当执行此程序时,从键盘输入1234567890↙,则程序的运行结果是:()A、4567.89B、1234.56C、******D、1234.5

单选题阅读下列程序  CHARACTER A*4,B*5,C*4  DATA A,B,C/’BIG’,’MIDDLE’,’SMALL’/  WRITE(*,20)A,B,C  20 FORMAT(1X,A2,A3,A4)  END  程序运行结果是()A BIGMIDDLEB *********C BIGMIDSMAD BIMIDSMAL

单选题阅读下列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

单选题有程序:READ(*,50)SWRITE(*,100)S50FORMAT(1X,F7.3)100FORMAT(1X,F8.3)END执行此程序,由键盘输入123456789,则输出S的值为:()A1234.576B2345.678C345.678D*******

单选题有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的运行结果是:()AABCDEFBACDFGHC******DABCDEFGHI

单选题阅读下列程序 K(X,Y)=X/Y+X   A=-2.0   B=4.0   B=1.0+K(A,B)   WRITE(*,10)B   10 FORMAT(1X,F4.1)  END  程序运行结果是()A-1.0B1.0C2.0D3.0

单选题有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END当执行此程序时,从键盘输入1234567890↙,则程序的运行结果是:()A4567.89B1234.56C******D1234.5

单选题阅读下列程序  DIMENSION M(3,3)  DATA M/1,2,3,4,5,6,7,8,9/  WRITE(*,100)(M(3,J),J=1,3)  100 FORMAT(1X,3I2)  END  程序运行结果是()A 2  5  8B 3  6  9C 4  5  6D 7  8  9

单选题阅读下列程序  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

单选题阅读下列程序  N=0  DO 10 K=1,3  N =N+1  M=K*N  10 CONTINUE  WRITE(*,’(1X,2I3)’)M,K  END  程序运行结果是()A 9  4B 9  3C 12  4D 12  3(#^)

单选题阅读下列程序  F=1.0  DO 20,J=3,7,2  DO 20,K=J-1,J  20 F =F*K  WRITE(*,’(13,F8.1)’)J,F  END  程序运行结果是()A 3 6.0B 5 120.0C 9 5040.0D 9362880.0