立方根を計算するプログラム


 

計算の方法は、ルートの場合とほとんど変わりません。 ルートの計算では、 二乗し

て比較しましたが、立方根の場合は三乗して比較します。 したがって、自然数に関

して立方根を求めるプログラムでは、  以下の行番号の命令文を次のように修正し

ます。

 

・・・・・

50 LET B0=(L+1)^3

・・・・・

170 LET B1=(MS0+(M1+1)/10)^3

・・・・・

240 LET B2=(MS1+(M2+1)/100)^3

・・・・・

310 LET B3=(MS2+(M3+1)/1000)^3

・・・・・

370 LET HN=K^(1/3)

・・・・・

 

小数第四位小数第五位に関しても同様に考えればいい訳です。プログラムコー

ドを追加して計算してみてください。 また、元の数の正負については、一番最初に

F文で判断して、最後に立方根の値に正負を付加するようにしてください。

 

最後に、配列と外部副プログラムを使って、 プログラムをコンパクト化したものを以

下に示します。ちなみに、小数第十二位まで正確に計算しているようです。

 

PROGRAM-RIPPOUKON-KEISAN-1.GIF - 8,177BYTES

PROGRAM-RIPPOUKON-KEISAN-2.GIF - 5,202BYTES

 

課題(その1)

 

小数第百位や小数第二百位まで正確に立方根を計算する方法を考えてみてくださ

い。

 

 


 

Topへ