frfrfrfr https://blog.hatena.ne.jp/frfrfrfr/ プログラミングを上達させたい https://frfrfrfr.hatenablog.com/ ProjectEuler Scheme 続けています。 Problem 16 (define (power a n) (if (= n 0) 1 (* a (power a (- n 1))))) (define (ketawa n) (if (= n 0) 0 (+ (modulo n 10) (ketawa (quotient n 10))))) (display (ketawa (power 2 1000))) (newline) でかい数字、かかってこいよでおなじみScheme。余裕でした。 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Ffrfrfrfr.hatenablog.com%2Fentry%2F2019%2F11%2F22%2F223631" title="Project Euler(with Scheme) Problem 16,17,18 - プログラミングを上達させたい" 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 2019-11-22 22:36:31 rich https://frfrfrfr.hatenablog.com/entry/2019/11/22/223631 1.0 100%