2. 工程
  3. 阅读下列FORTRAN程序： DIMENSION M(6) READ(*，*)M DO 10 J=1，6 DO 10 K=J，6 IF(M(K)LTM(J))THEN N=M(K) M(K)=

阅读下列FORTRAN程序： DIMENSION M(6) READ(*，*)M DO 10 J=1，6 DO 10 K=J，6 IF(M(K)LTM(J))THEN N=M(K) M(K)=

admin2010-03-07  25
问题 阅读下列FORTRAN程序：   
    DIMENSION M(6)
    READ(*，*)M
    DO 10 J=1，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
答案A
解析 数组赋值以后，各数组元素的值为：
M(1)=10，M(2)=7，M(3)=9，M(4)=2，M(5)=1，M(6)=3。
当循环一次后M(1)的值就确定下来了，因此不需要再做下去。
转载请注明原文地址:https://jikaoti.com/ti/yEPhFFFM
本试题收录于： 供配电（公共基础）题库注册电气工程师分类
0

供配电（公共基础）

注册电气工程师

相关试题推荐
随机试题
最新回复(0)