sirocco https://blog.hatena.ne.jp/sirocco/ sirocco の書いてもすぐに忘れるメモ https://sirocco.hatenadiary.org/ Haskell 「やさしくわかる数学のはなし７７」という本に「ウォリス積」、「マダヴァの公式」による円周率の計算式が載っていましたのでやってみました。 ウォリス積 import Ratio -- ウォリス積 -- 2・2・4・4・6・6・8・8... -- 2 pi = ----------------------- -- 1・3・3・5・5・7・7・9... -- 無限数列を作る -- x : 初期値 -- c : True と False の二進カウンタ numSeque :: Integer -> Bool -> [Integer] numSeque x c = x: case c of False -… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fsirocco.hatenadiary.org%2Fentry%2F20110223%2F1298408742" title="「ウォリス積」、「マダヴァの公式」による円周率 - sirocco の書いてもすぐに忘れるメモ" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2011-02-23 06:05:42 rich https://sirocco.hatenadiary.org/entry/20110223/1298408742 1.0 100%