已知顺序数据文件FILE3.DAT有如下数据: 50,54,64,65 65,70,85,9046,73,60,72阅读FORTRAN程序DIMENSIONM(12) OPENdO,FILE=:FILE3.DAT,) READC10,*)(M(I),I=1,12) D010J=1,12IF(M(J).G E.60)N=N+110CONTINUEWRITE(*,20)N20FORMAT(2X,‘N=,,12) END 程序输出后的结果是:
A.N=7 B.N=8 C.N=4 D.N=9正确答案B
已知顺序数据文件FILE3.DAT有如下数据: 50,54,64,65 65,70,85,9046,73,60,72阅读FORTRAN程序DIMENSIONM(12) OPENdO,FILE=:FILE3.DAT,) READC10,*)(M(I),I=1,12) D010J=1,12IF(M(J).G E.60)N=N+110CONTINUEWRITE(*,20)N20FORMAT(2X,‘N=,,12) END 程序输出后的结果是:
A.N=7 B.N=8 C.N=4 D.N=9正确答案B