ROOTx.BASとBIGNUM.BASを同じディレクトリに保存し、ROOTx.BASを実行してください。(xは2,3,5,N)
MachiKania type Zでも実行可能ですが、WIDTH 48モードを持っていないのでWIDTH 40に変更してください。
ただし、画面スクロールしてぎりぎり表示が切れてしまうので、スクロールしないようにキー入力待ちなど入れてください。
ROOTN.BASは任意の自然数の平方根を計算します。最初の「N=2」を編集してください。(Nは9999以下)
最後に二乗した数字を表示して検算ができます。
ニュートン法で以下の漸化式に見直しをすることで大幅に高速化しました。
X(n+1)=X(n)(3N-X(n)^2)/(2*N)
CUBEROOT.BASは任意の自然数の立方根を小数点以下1000桁まで計算します。最初の「N=2」を編集してください。
ニュートン法で以下の式を使っています。
X(n+1)=X(n)(4N-X(n)^3)/(3*N)
4TH-ROOT.BASは任意の自然数の4乗根を小数点以下1000桁まで計算します。最初の「N=3」を編集してください。
ニュートン法で以下の式を使っています。
X(n+1)=X(n)(5N-X(n)^4)/(4*N)