更多"[单选题]阅读FORTR"的相关试题:
[单选题]阅读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
[单选题]阅读以下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
[单选题]阅读下列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