有程序
open(1,file='datl',status='old')
read(1,*)a,b,c
read(1,*)x,Y
backspace 1
do 10 I=1.9
read(1,*,end=20)x
y=y+x
if(y.ge.19)goto 20
10 continue
20 print*,x
end
数据文件dat1经编辑其内容为
1,2,3
4,5,6
7,8,9
程序执行后,输出结果为
。
A、
7.0
B、
5.0
C、
6.0
D、
8.0
【正确答案】
A
【答案解析】
考察文件的读取知识,正确答案为(A)。
提交答案
关闭