tanakaBox https://blog.hatena.ne.jp/tanakaBox/ ボクノス https://boxnos.hatenablog.com/ Scheme 翻訳無いけどやってみる。Problem 65 - Project Euler √2の連分数は、√2 = [1;(2)]と表せて、eの連分数表記は、e = [2; 1,2,1, 1,4,1, 1,6,1 , ... , 1,2k,1, ...]こんなんらしい。100項目の分子の数値の和を求める。 問題は長いけど、やることはシンプル。 前にも連分数が出てきたけど、今回は(1,2k,1)というちょっと変則的な連分数なので、再帰で下の方から求めていく。 連分数リストなら何でも来い的な感じに仕上げてみた。 (define (problem65 seed sequence) (let ((res (fol… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20080521%2F1211312718" title=" Problem 65 - eの連分数 - ボクノス" 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 2008-05-21 04:45:18 rich https://boxnos.hatenablog.com/entry/20080521/1211312718 1.0 100%