当前位置:首页
建筑知识
已知顺序数据文件 FILE3.DAT有如下数据:50,54, 64,6565,70,85, 9046,73,60, 72阅读FORTRAN程序DIMENSION M(12)OPEN(10,FILE=&
已知顺序数据文件 FILE3.DAT有如下数据:50,54, 64,6565,70,85, 9046,73,60, 72阅读FORTRAN程序DIMENSION M(12)OPEN(10,FILE='FILE3.DAT')READ(10,*) (M(), 1=1, 12)DO 10J=1,12IF (M(J).GE.60) N=N+110 ConTINUE .WRITE(*,20) N20 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个。