フォートラン77(fortran77)わかる方募集 [無断転載禁止]©2ch.net

1ダイコン男子2016/07/30(土) 15:58:25.31ID:/ZfqrE7U
フォートランの課題が分からずに困っております。

2名無しさん@3周年2016/07/30(土) 15:59:54.81ID:/ZfqrE7U
>>1
助けてくださいーーー!( ; ; )

3名無しさん@3周年2016/07/30(土) 16:04:18.21ID:/ZfqrE7U
>>2
重力のみが作用する振り子(図)の運動を解析するプログラムを完成させよ。 棒は重さがなく、伸縮もないとする。ただしθは小さくはない。初期値は速度は0、角度は入力(0<θ 0<π)とする。時間、速度、角度を出力すること。
必要な方程式を書け。 dv/dt= dθ/dt=
real L
data g,L / 9.8, 1,0/

write (*,*) ' Δt (sec) ='
read (*,*) dt
* initial

2 write (*,*)' θ0 (radian) = '
read (*,*) s0

s=
v=
t=
vL=v

*repeat

1 a=
v=
w=
s=
t=

write (*,'(3f8.4)')

if (vL.gt.0.0.and.v.lt.0.0) go to 2
vL =v
go to 1
end

4名無しさん@3周年2016/07/31(日) 17:19:36.22ID:V0Zx2bgt
出題者に聞け。もしかして仕事か?

5名無しさん@3周年2016/08/01(月) 16:24:14.98ID:JfrNf9IP
いちいち質問スレ立てる馬鹿には教えない。

6名無しさん@3周年2017/02/22(水) 22:08:58.35ID:c8YmUWWj

新着レスの表示
レスを投稿する