Fortran77的编程问题,C WATER HAMMER FINITEDIMENSION V(100),H(100)READ(5,1) DX,DT,C,HO,VO,TOL,IMAX1 FORMAT(6F7.0,I4)IMAX1=IMAX-1V(I)=VO2 H(I)=HOT=0N=0100 T=T+DTN=N+1IF(T.GT.TOL) GO TO 3SR=(TOL-T)/TOLGO TO 43 SR=04 CONTINUEV(IMAX)=SR*SQRT(2.*9.81*H

来源：学生作业帮助网 编辑：作业帮 时间：2024/05/10 11:12:42
Fortran77的编程问题,C WATER HAMMER FINITEDIMENSION V(100),H(100)READ(5,1) DX,DT,C,HO,VO,TOL,IMAX1 FORMAT(6F7.0,I4)IMAX1=IMAX-1V(I)=VO2 H(I)=HOT=0N=0100 T=T+DTN=N+1IF(T.GT.TOL) GO TO 3SR=(TOL-T)/TOLGO TO 43 SR=04 CONTINUEV(IMAX)=SR*SQRT(2.*9.81*H

Fortran77的编程问题,C WATER HAMMER FINITEDIMENSION V(100),H(100)READ(5,1) DX,DT,C,HO,VO,TOL,IMAX1 FORMAT(6F7.0,I4)IMAX1=IMAX-1V(I)=VO2 H(I)=HOT=0N=0100 T=T+DTN=N+1IF(T.GT.TOL) GO TO 3SR=(TOL-T)/TOLGO TO 43 SR=04 CONTINUEV(IMAX)=SR*SQRT(2.*9.81*H
Fortran77的编程问题,
C WATER HAMMER FINITE
DIMENSION V(100),H(100)
READ(5,1) DX,DT,C,HO,VO,TOL,IMAX
1 FORMAT(6F7.0,I4)
IMAX1=IMAX-1
V(I)=VO
2 H(I)=HO
T=0
N=0
100 T=T+DT
N=N+1
IF(T.GT.TOL) GO TO 3
SR=(TOL-T)/TOL
GO TO 4
3 SR=0
4 CONTINUE
V(IMAX)=SR*SQRT(2.*9.81*HO)
\x05 DO 5 I=2,IMAX1
5 V(I)=V(I)-9.81*DT*(H(I)-H(I-1))/DX
\x05 DO 6 I=2,IMAX1
6 H(I)=H(I)-DT*C**2/9.81*(V(I+1))-V(I)/DX
WRITE (6,11) T
11 FORMAT(F10.3)
\x05 WRITE(6,12) (V(I),I=1,IMAX)
\x05 WRITE(6,12) (H(I),I=1,IMAX)
12\x05 FORMAT (12F10.4)
\x05 IF(N.LT.200) GO TO 100
\x05 STOP
\x05 END

Fortran77的编程问题,C WATER HAMMER FINITEDIMENSION V(100),H(100)READ(5,1) DX,DT,C,HO,VO,TOL,IMAX1 FORMAT(6F7.0,I4)IMAX1=IMAX-1V(I)=VO2 H(I)=HOT=0N=0100 T=T+DTN=N+1IF(T.GT.TOL) GO TO 3SR=(TOL-T)/TOLGO TO 43 SR=04 CONTINUEV(IMAX)=SR*SQRT(2.*9.81*H
没有说问题啊.

Fortran77的编程问题,C WATER HAMMER FINITEDIMENSION V(100),H(100)READ(5,1) DX,DT,C,HO,VO,TOL,IMAX1 FORMAT(6F7.0,I4)IMAX1=IMAX-1V(I)=VO2 H(I)=HOT=0N=0100 T=T+DTN=N+1IF(T.GT.TOL) GO TO 3SR=(TOL-T)/TOLGO TO 43 SR=04 CONTINUEV(IMAX)=SR*SQRT(2.*9.81*H 用fortran77或95编,值为0.0的4800个点,应该怎么编程?比如每隔1秒读一数,这数一直为0.0,共读4800个. SAS的编程问题, C语言解不等式的一个编程问题,只要代码 wat C语言编程问题 输入a,b,c三个数 最后 要求输出最大的. C语言编程问题 出错在哪里 题目是：从键盘任意输入一个实数不使用计算绝对值函数编程计算并输出该实数的绝对值. 用fortran77编程.1.分别将100到200之间的全部偶数分解成为两个质数之和.2.打印出由1、2、3、4四个数字组成的所有可能的四位数,并统计它们的个数（允许出现各位数字相同的数,如1111） C语言编程问题,求Fibonacci数列题目要求如图所示.. C语言问题：编程求1!+2!+3!+4!+5!. FORTRAN77中write(*, 计算器上的“TWO WAT POWER”是什么意思? 请问：“play means wat 的中文意思. C语言的最大公约数最小公倍数怎么编程 c语言统计男女人数的编程 问一个C语言的编程问题~判断一个数n能否同时被3和5整除~ c语言问题.编程求一个4*4矩阵两条对角线上所有元素的和 c编程的问题编程序输出【m,n】之间所有的素数,m、n通过键盘输入.