smoking186 https://blog.hatena.ne.jp/smoking186/ 186 @ hatenablog https://186.hatenablog.com/ CS Project Euler 127問. Repunit系は129だけ残ってしまった. 位数を求めるのは面倒臭いなぁ. PROB119はこっちの方向が良いんだな. num->digitsは各桁にばらす関数 (use srfi-42) (list-ref (sort (list-ec (: b 2 1000) (: e 1 50) (if (and (> (expt b e) 10) (= b (apply + (num->digits (expt b e)))))) (list (expt b e) b e)) (lambda (x y) (< (car x) (car y)))) 29) Problem 122は加法鎖の… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2F186.hatenablog.com%2Fentry%2F20080323%2F1206251364" title=" - 186 @ hatenablog" 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-03-23 14:49:24 rich https://186.hatenablog.com/entry/20080323/1206251364 1.0 100%