{"title":" Problem 73 - 1/2\u30681/3\u306e\u9593","description":"\u5fae\u5999\u3002\u75b2\u308c\u3066\u304d\u305f\u304b\u3082\u3002Problem 73 - PukiWiki1/2\u30681/3\u306e\u9593\u306b\u3042\u308b\u771f\u65e2\u7d04\u5206\u6570\u3092\u6c42\u3081\u308b\u3002 \u771f\u65e2\u7d04\u5206\u6570\u3092\u6c42\u3081\u308b\u306e\u304c\u3061\u3068\u3081\u3093\u3069\u304b\u3063\u305f\u306e\u3067\u3001\u5168\u90e8\u898b\u3066\u3057\u307e\u3063\u305f\u3002 \u3060\u3044\u305f\u3044\u7bc4\u56f2\u3092\u7d5e\u3063\u3066\u304a\u3044\u3066\u3001 gcd\u3057\u3066\u307f\u308b\u3002 \u3060\u3044\u305f\u3044\u306a\u306e\u3067\u3001\u30ad\u30c3\u30c1\u30ea\u7bc4\u56f2\u30c1\u30a7\u30c3\u30af\u3002 \u4eca\u306f\u53cd\u7701\u3057\u3066\u3044\u308b\u3002 (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\u2026","version":"1.0","type":"rich","height":"190","url":"https://boxnos.hatenablog.com/entry/20080523/1211492070","author_url":"https://blog.hatena.ne.jp/tanakaBox/","image_url":null,"provider_url":"https://hatena.blog","author_name":"tanakaBox","blog_url":"https://boxnos.hatenablog.com/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20080523%2F1211492070\" title=\" Problem 73 - 1/2\u30681/3\u306e\u9593 - \u30dc\u30af\u30ce\u30b9\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","blog_title":"\u30dc\u30af\u30ce\u30b9","published":"2008-05-23 06:34:30","categories":["Scheme"],"provider_name":"Hatena Blog","width":"100%"}