已知顺序数据文件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)
DO 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

2023-06-01



参考答案:B