单选题 已知顺序数据文件FILE3.DAT有如下数据:
    50,54,64,65
    65,70,85,90
    46,73,60,72
    阅读FORTRAN程序
    DIMENSION M(12)
    OPEN(10,FILE=:FILE3.DAT,)
    READ(10,*)(M(I),I=1,12)
    D0 10J=1,12
    IF(M(J).GE.60)N=N+1
    10  CONTINUE
    WRITE(*,20)N
    20  FORMAT(2X,'N=',12)
    END
    程序输出后的结果是:
  • A.N=7
  • B.N=8
  • C.N=4
  • D.N=9
 
【正确答案】 B
【答案解析】 数组元素赋值分别为:M(1)=50,M(2)=54,M(3)=64,M(4)=55,M(5)=65,M(6)=70,M(7)=85,M(8)=90,M(9)=46,M(10)=73,M(11)=60,M(12)=72,
   循环判断数组元素的值大于等于60的数,而后记录它们的个数,总共有8个。