[1] 授業単元：計算物理学
[2] fortranで書かれたプログラムをC言語でお願いします。
[3] 環境
　[3.1] OS： Windows
　[3.2] コンパイラ名とバージョン： bcpad
　[3.3] 言語： C
[4] 期限：7月3日


C*** 　report2
C*** 　gakusekibangou
DIMENSION YA(30),VA(30),YS(30),VS(30),YR(30),VR(30)
OPEN(UNIT=16,FILE="dy.d")
OPEN(UNIT=17,FILE="dv.d")
G=9.8
R=0.3
CANALYTIC SOL.
DO 10 K=1,30
T=K
EP=EXP(-R*T)
VA(K)=G/R*(1.0-EP)
YA(K)=G/R*T-G/R/R*(1.0-EP)