{"provider_name":"Hatena Blog","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20080402%2F1207143439\" title=\" Problem 9 - \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>","height":"190","author_url":"https://blog.hatena.ne.jp/tanakaBox/","title":" Problem 9","type":"rich","author_name":"tanakaBox","description":"\u4e09\u5e73\u65b9\u306e\u5b9a\u7406\u3002\u61d0\u304b\u3057\u3044\u306a\u3002 \u30d4\u30bf\u30b4\u30e9\u30b9\u306e\u4e09\u3064\u7d44(\u30d4\u30bf\u30b4\u30e9\u30b9\u306e\u5b9a\u7406\u3092\u6e80\u305f\u3059\u6574\u6570)\u3068\u306fa \u3046\u3045\u3093\u3002 \u8003\u3048\u3066\u307f\u305f\u3051\u3069\u3001\u529b\u305a\u304f\u3067\u89e3\u304f\u65b9\u6cd5\u3057\u304b\u601d\u3044\u3064\u304b\u305a\u3002 (define (problem9 n) (define (square x) (* x x)) (define (iter a b c) (cond ((= (square c) (+ (square a) (square b))) (list a b c)) ((>= a (+ b c)) (error \"not found.\")) ((>= b c) (iter (+ a 1) (+ a 2) (- (- n (+ a 1)) (+ a 2))\u2026","url":"https://boxnos.hatenablog.com/entry/20080402/1207143439","categories":["Scheme"],"version":"1.0","published":"2008-04-02 22:37:19","provider_url":"https://hatena.blog","image_url":null,"blog_url":"https://boxnos.hatenablog.com/","blog_title":"\u30dc\u30af\u30ce\u30b9","width":"100%"}