单项选择题
有程序
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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
下面程序段的运行结果是( )。 DIMENSION SUM(3) DATA SUM 1.0,2.0,3.0 I=2 X=ADD(I,SUM) WRITE(*,10)X 10 FORMAT(1X,F3.1) END FUNCTION ADD(N,SUM) DIMENSION SUM(N),L(2) ADD=0 L(2)=2 DO 20 I=1,N ADD=ADD+SUM(I) L(2) 20 CONTINUE END
A.1.0
B.1.5
C.2.0
D.3.0
点击查看答案&解析
单项选择题
在长管水力计算中,( )。
A.只有速度头v<sup>2</sup>/(2g)可忽略不计
B.只有局部水头损失h<sub>i</sub>均可忽略不计
C.速度头v<sup>2</sup>/(2g)和局部水头损失h<sub>i</sub>均可忽略不计
D.两断面的测压管水头差△H<sub>p1-2</sub>并不等于两断面间的沿程水头损失h<sub>f1-2</sub>
点击查看答案&解析
相关试题
如图所示之结构中,杆1为铜制,其横截面积...