{"description":"\u7c21\u5358\uff01Problem 16 - PukiWiki 2^15 = 32768 \u3067\u3042\u308a\u3001\u3053\u308c\u306e\u5404\u6570\u5b57\u306e\u5408\u8a08\u306f 3 + 2 + 7 + 6 + 8 = 26 \u3068\u306a\u308b\u3002\u540c\u69d8\u306b\u3057\u3066\u30012^1000 \u306e\u5404\u6570\u5b57\u306e\u5408\u8a08\u3092\u6c42\u3081\u3088\u3002 \u306f\u3044\u306f\u3044\u3002 (define (digit->integer c) (if (char-numeric? c) (- (char->integer c) (char->integer #\\0)) #f)) (fold (lambda (c acc) (+ (digit->integer c) acc)) 0 (string->list (number->string (expt 2 10\u2026","type":"rich","url":"https://boxnos.hatenablog.com/entry/20080404/1207262095","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20080404%2F1207262095\" title=\" Problem 16 - 2\u306e1000\u4e57 - \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>","title":" Problem 16 - 2\u306e1000\u4e57","provider_name":"Hatena Blog","categories":["Scheme"],"author_url":"https://blog.hatena.ne.jp/tanakaBox/","published":"2008-04-04 07:34:55","blog_url":"https://boxnos.hatenablog.com/","image_url":null,"author_name":"tanakaBox","provider_url":"https://hatena.blog","height":"190","width":"100%","blog_title":"\u30dc\u30af\u30ce\u30b9","version":"1.0"}