円周率を求めるを作りんたいんですけど、いまいち進みません。何かヒントでもあったらおねがいします。
なんでもいいから求められればいいのなら、
モンテカルロ法が簡単でいいでしょう。
時間ばかりかかって精度は低いので非実用的ですが・・・。
級数使うならライプニッツの公式が簡単でいいですが、収束遅いです。
普通はマチンの公式をアレンジして使います。
学術的な目的等で無ければ、
Debug.Print 4*Atn(1)
が利用できるかと思います。
VBのDouble型を超える精度の桁数が必要なのであれば、
Sayさんが書かれた公式等を参考に、計算式を組んでみてください。
遅くなってすみません。Sayさん 魔界の仮面弁士さんありがとうございました。お二人の答えを参考にしてやったらできました。本当にありがとうございます。
技術系掲示板ではGiva And Takeが原則ですから、
ただのお礼でなく、どうやって実現したかを
報告してくれるとうれしいのですが・・・。
同じ問題で悩んでる人がいるかもしれませんし、
あなたの質問で興味をもった人もいるかもしれませんので。
ツイート | ![]() |