tanakaBox https://blog.hatena.ne.jp/tanakaBox/ ボクノス https://boxnos.hatenablog.com/ Scheme 微妙。疲れてきたかも。Problem 73 - PukiWiki1/2と1/3の間にある真既約分数を求める。 真既約分数を求めるのがちとめんどかったので、全部見てしまった。 だいたい範囲を絞っておいて、 gcdしてみる。 だいたいなので、キッチリ範囲チェック。 今は反省している。 (define (problem73 n) (length (append-map (lambda (d) (filter (lambda (n) (and (= (gcd n d) 1) (> (/ n d) 1/3) (< (/ n d) 1/2))) (iota (+ (- (quotient d 2) (qu… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20080523%2F1211492070" title=" Problem 73 - 1/2と1/3の間 - ボクノス" 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-23 06:34:30 rich https://boxnos.hatenablog.com/entry/20080523/1211492070 1.0 100%