网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
已知顺序数据文件FILE3. DAT有如下数据:
50,54,64,65
65,70,85,90 46,73,60,72 阅读FORTRAN程序 DIMENSION M(12)
OPENdO,FILE=:FILE3. DAT,)
READC10,*)(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
程序输出后的结果是:
50,54,64,65
65,70,85,90 46,73,60,72 阅读FORTRAN程序 DIMENSION M(12)
OPENdO,FILE=:FILE3. DAT,)
READC10,*)(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.N=8
C.N=4
D. N=9
参考答案
参考解析
解析:数组元素赋值分别为: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个。
答案:B
循环判断数组元素的值大于等于60的数,而后记录它们的个数,总共有8个。
答案:B
更多 “已知顺序数据文件FILE3. DAT有如下数据: 50,54,64,65 65,70,85,90 46,73,60,72 阅读FORTRAN程序 DIMENSION M(12) OPENdO,FILE=:FILE3. DAT,) READC10,*)(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 ” 相关考题
考题
CDT/CT数据文件包括()
A.MRR_CELL_1648_2009-05-25-23-59-53.dat.gzB.MRR_UE_1648_2009-05-25-23-59-53.dat.gzC.CDT_1871_2009-06-30-00-00-03.dat.gzD.TD_STREAM_ASSO_LOG_INFO_20090513000000.csv.gz
考题
阅读FORTAN程序:
OPEN(8,FILE=FILE2.DAT,STATUS:NEW)DO10I=1>3
WRITE(8,(4I4))(J+I,J=1,4)
10CONTINUECLOSEC8)
END
程序运行后,数据文件FIFE2.DAT的内容是:
考题
已知顺序数据文件FILEI. DAT的内容如下:
1,2,3
4,5,6
7,8,9
程序:
0PEN(9,FILE=FILE1. DAT)
READC9, *)A,B,C READ(9,*)X,Y BACKSPACE。)
READ(9,*)D,E,F WRITEO,100)D,E,F 100 FOEMAT(2X,3F4.1)
END
程序运行后的输出结果是:
A. 4.0 5.0 6.0
B. 5. 0 6. 0 7. 0
C. 7.0 8.0 9.0
D. 1.0 2.0 3.0
考题
阅读FORTRAN程序:
OPEN(8,FILE=FILE2 DAT,STATUS=NEW)
DO 10 I=1,3
WEITE(8,(4I4)JI+I,J=1,4)
10 CONTINUE
CLOSE(8)
END
程序运行后,数据文件FILE2,DAT的内容是:
考题
已知顺序数据文件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
考题
下列()语句可以完成打开顺序文件“abv.dat”并追加数据。A、Open"abC.dat"ForInputAs#1B、Open"abC.dat"ForOutputAs#1C、Open"abC.dat"ForBinaryAs#1D、D.Open"abdat"ForAppendAs#1
考题
CDT/CT数据文件包括()A、MRR_CELL_1648_2009-05-25-23-59-53.dat.gzB、MRR_UE_1648_2009-05-25-23-59-53.dat.gzC、CDT_1871_2009-06-30-00-00-03.dat.gzD、TD_STREAM_ASSO_LOG_INFO_20090513000000.csv.gz
考题
填空题在VB中的数据文件分为顺序文件和()文件。
热门标签
最新试卷