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

题目内容 (请给出正确答案)
单选题
阅读下列程序  READ(*,*)K  WRITE(*,100)K  100 FORMAT(I5)  END  程序运行时输入初始值12345,那么显示结果是()
A

 2345

B

 12345

C

 ****

D

 *****


参考答案

参考解析
解析: 暂无解析
更多 “单选题阅读下列程序  READ(*,*)K  WRITE(*,100)K  100 FORMAT(I5)  END  程序运行时输入初始值12345,那么显示结果是()A  2345B  12345C  ****D  *****” 相关考题
考题 阅读下列FORTRAN程序: DIMENSION M(6) READ(*,*)M DO 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 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程序: INTEGER X(7) DATA X/10,20,45,70,80,15,14/ M/X(l) DO 10 1=2,7 IF(X(I).GIM)THEN M=X(I) K=1 END IF 10 CONTINUE N=X(K) X(K)=X(I) X(I)=N WRITE( *,100)(X(I),I=1,7) 100 FORMAT(2X,713) END 程序运行的结果是: A. 10 20 45 70 80 15 14 B. 14 20 45 70 80 15 10 C. 80 20 45 70 10 15 14 D. 20 45 70 80 15 14 10

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

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

考题 阅读下列FORTRAN程序: MOIUH=N(5)+NdO) WRITE( *,‘(2X,15),)MQIUH END FUNCTION N(K) N=0 DOIO J=1,K N=N+J 10 CONTINUE RETURN END 程序运行后的结果是: A. 65 B. 85 C. 90 D. 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.8 B.9 C.10 D.11

考题 阅读FORTRAN程序: READC*,*)I,J,K DO 10 N=l,2 I=I+J+K J=I+K+J K=I+J+K 10 CONTINUE WRITE(*,20)I,J,K 20 FORMAT(2X,315) END 键盘输入1,0,0则程序运行后的输出结果是: A. 4 7 13 B.2 3 4 C. 1 1 2 D. 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) END FUNCTION M(N) M=N+1 RETURN END 程序的输出结果是: A. K4=28 B. K4=27 C. K4=30 D. K4=29

考题 阅读下列FORTRAN程序: INTEGER X(7) DATA X/4,5,7,8,10,12,11/ DO 10 K=1,7 IF(MOD(X(K),2).NE.0)THEN S=A+X(K) N=N+1 END IF 10 CONTINUE T=S/N WRITE(*,20)S,T 20 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.3 B.2 C.1 D.0

考题 阅读以下FORTRAN 程序: READ( *,*) M IF (M. LT. 100. AND. M. GT. 999) STOP K=M/100 L=(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(*,*)N DO 10 K-1,N S=S+K**2 10 CONTINUE WRITE(*,100)S 100 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 IF 10 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)K4 100 FORMAT(2X;K4;I3) END FUNCTION M(N) M=N+1 RETURN END 程序输出结果是: (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+J 10 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的值为:()A 1234.576B 2345.678C 345.678D *******

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

考题 单选题阅读下列程序 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.0B 1.0C 2.0D 3.0

考题 单选题有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END当执行此程序时,从键盘输入1234567890↙,则程序的运行结果是:()A 4567.89B 1234.56C ******D 1234.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