- 102 名前：デフォルトの名無しさん [2006/12/14(木) 03:12:02 ]
- 求めるＰ３の値がちょうど３（限りなく近い）値になるときのdaの値
を小数点６桁ぐらいまで求めたいのですが、どうすれば次のプログラムを
効率よくdaの値が一回で出せるプログラムにできるか知恵をお貸しください。
DIMENSION E22(2),oo(2)
REAL k,pi,a,o,z,Kf,kf1
pi=3.1415926
DO 30 da= 1.000 , 0.800 , -0.002
DO 30 n4= 8 , 8
k=5.319
a=k/0.529177
o=(a**3)/2.0*da
oo(1)=o
z=1.0
