阅读下列FORTRAN程序: DIMENSION M(6) READ(*,*

天天题库2019-12-17  22

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

答案A

解析数组赋值以后,各数组元素的值为:M(1)=10,M(2)=7,M(3)=9,M(4)=2,M(5)=1,M(6)=3。当循环一次后M(l)的值就确定下来了,因此不需要再做下去。答案:A
转载请注明原文地址:https://ti.zuoweng.com/ti/qrUNKKKQ