TT-F-Learning-Fortran 計算物理学 試験問題
2003年
計算物理学試験問題 （16/july/02竹下）
この問題はメールで送る。以下に問題を10問送る、これから6問を選んで回答を各問いの下に書き足して返信せよ。使ったプログラムは問いに付けよ。
(1) integer x=13; と real y= 52.2747; real z;
の時、つぎの計算を行ないその結果をここに記せ。
(a) z=x*y/(x**2) (b)z= exp(-y)*sin(x*y) (c)z=(2x)* log(y+x)
(2) つぎの無限和をとるプログラムを作り、ここに張り付け、その結果も書け。
1/sqrt(1)-1/sqrt(2)+1/sqrt(3)-...
(3) /usr/local/ に書かれている最後の単語を書け。
(4)つぎの関数を小数点下１桁以上の精度で定積分せよ、ただしx=0.254から7.561まで。
(1/sqrt(x*x+4.5))*exp(-1.7*x)
(5)単振動する物体の運動を記述する動くプログラムをここへ書け。物体の位置を表す実数変数をx，時刻を表す実数変数をtとすること。
(6)つぎの11この数値の平均と標準偏差を計算せよ。
124.85，97.164，99.857，144.39，135.248，117.3625，108.0567，106.2477，80.257，
102.984，98.839
(7)xを0.0から1.0までの一様乱数として、sin(6.2831*x)の頻度分布のヒスト
グラムをつくり、ここへ描け。
(8)一次元ランダムウオークで乱数が0.5以上のとき左へ動き、乱数が0.5より小さいとき動かないとして、1347歩めの座標を求めよ。ただし乱数の
初期値を17とせよ。
(9) 2つの一様乱数から円周率πを計算せよ。授業webを参照せよ。
(10)つぎのプログラムの誤りを指摘し正せ。
Back
to T.Takeshita's page here.