阅读下列FORTRAN程序:
DIMENSIONM(6)
READ(*,*)M
DO10J=1,6
DO10K=J,6
IF(M(K).LT.M(J))THEN
N=M(K)
M(K)=M(J)
M(J)=N
ENDIF
10CONTINUE
WRITE(*,100)(M(I),I=1,6)
100FORMAT(2X,614)
END
键盘输入10,7,9,2,1,3;程序运行后的输出结果是:
欢迎免费使用小程序搜题/刷题/查看解析,提升学历,成考自考报名,论文代写、论文查重请加客服微信skr-web
阅读下列FORTRAN程序:
DIMENSIONM(6)
READ(*,*)M
DO10J=1,6
DO10K=J,6
IF(M(K).LT.M(J))THEN
N=M(K)
M(K)=M(J)
M(J)=N
ENDIF
10CONTINUE
WRITE(*,100)(M(I),I=1,6)
100FORMAT(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
正确答案A
×
提示:小程序已经收录此题,请在小程序查看名师解析。翰林刷小程序提供搜题,刷题,助你轻松通过考试