(2008年)阅读下列FORTRAN程序: DIMENSION M(4,3) DATE M/-10,12,24,11,20,-15,61,78,93,30,44,-45/ N=M(1,1) DO 10 I=1,4

admin2014-08-29  32

问题 (2008年)阅读下列FORTRAN程序:
    DIMENSION M(4,3)
    DATE M/-10,12,24,11,20,-15,61,78,93,30,44,-45/
    N=M(1,1)
    DO  10 I=1,4
    DO  10 J=1,3
    IF  (M(I,J).LT.N)THEN
    N=M(I,J)
    K1=I
    K2=J
    ENFIF
    10  CONTINUE
    WRITE(*,‘(2x,314)’)N,K1,K2
    END
    程序运行后的输出结果是(    )。

选项 A、93,3,1
B、-10,1,1
C、-45,4,3
D、78,3,2

答案C

解析 数组元素的值分别为:    M(1,1)=-10,M(2,1)=-12,M(3,1)=-24,M(4,1)=11,
    M(1,2)=-20,M(2,2)=-15,M(3,2)=61,M(4,2)=78,
    M(1,3)=93,M(2,3)=30,M(3,3)=44,M(4,3)=-45,
    最后一次循环:N=M(4,3)=-45,K1=4,K2=3
转载请注明原文地址:https://jikaoti.com/ti/UJzhFFFM
0

最新回复(0)