单选题 已知顺序数据文件FILE3. DAT中有如下数值:
50,54,64,55
65,70,85,90
46,73,60,72
阅读FORTRAN程序:
DIMENSION M(12)
OPEN(10, FILE= FILE3. DAT)
READ(10,*)(M(I)=I,12)
DO 10 J=1,12
IF(M(J). GE. 60)N=N+1
10 CONTINUE
WRITE(*,20)N
20 FORMAT(2X,"N=", I2)
END
程序运行后输出的结果是______。
【正确答案】 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个。