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