【发布时间】:2014-04-06 14:50:30
【问题描述】:
我正在用 Fortran 编写一个程序来计算跳伞人员的速度与时间的关系。我不断收到无法修复的错误。我对编程很陌生,非常感谢任何帮助。
错误是
v(i+1)=v(i)+[32-((c*v(i)*v(i))/m)]*(h)
1
错误:在 (1) 处的分配中不相容的等级 0 和 1
我的程序是
PROGRAM para
INTEGER :: i
REAL :: v(11) !velocity
REAL :: q !initial velocity
REAL :: h !time step
REAL :: c !drag coefficient
REAL :: m !mass
! gravity is equal to 32 ft/s^2
WRITE (*,*)'enter time step'
READ(*,*)h
Write(*,*)'enter initial velocity'
READ(*,*)q
WRITE(*,*)'enter drag coefficient'
READ(*,*)c
WRITE(*,*)'enter mass'
READ(*,*)m
DO i=1,10 ! from 1 to 10, with 1 being the interval.
END DO
v(i+1)=v(i)+[32-((c*v(i)*v(i))/m)]*(h)
q=v(1)
结束程序
【问题讨论】:
标签: fortran