{"provider_url":"https://hatena.blog","provider_name":"Hatena Blog","type":"rich","published":"2008-11-23 21:33:08","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fjeneshicc.hatenadiary.org%2Fentry%2F20081123%2F1227443588\" title=\"Problem 101 - \u843d\u66f8\u304d\u3001\u6642\u3005\u843d\u5b66\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","categories":[],"title":"Problem 101","blog_title":"\u843d\u66f8\u304d\u3001\u6642\u3005\u843d\u5b66","author_name":"jeneshicc","url":"https://jeneshicc.hatenadiary.org/entry/20081123/1227443588","image_url":null,"author_url":"https://blog.hatena.ne.jp/jeneshicc/","height":"190","blog_url":"https://jeneshicc.hatenadiary.org/","description":"http://projecteuler.net/index.php?section=problems&id=101 \u5c11\u3057\u982d\u3092\u4f7f\u3063\u305f\u3002 \u305f\u3060\u306e\u968e\u5dee\u6570\u5217\u306f1\u6b21\u306e\u591a\u9805\u5f0f \uff12\u968e\u306e\u968e\u5dee\u6570\u5217\u306f\uff12\u6b21\u306e\u591a\u9805\u5f0f \uff13\u968e\u306e\u968e\u5dee\u6570\u5217\u306f\uff13\u6b21\u306e\u591a\u9805\u5f0f n\u968e\u306e\u968e\u5dee\u6570\u5217\u306fn\u6b21\u306e\u591a\u9805\u5f0f \u306a\u306e\u3067 \u968e\u5dee\u306e\u5c71\u3092\u4f5c\u3063\u3066 \u5404\u9ad8\u3055\u306e\u53f3\u7aef\u306e\u6570\u5b57\u3092\u5168\u90e8\u8db3\u3059\u30a4\u30e1\u30fc\u30b8 gen = foldr f 1 .replicate 10 where f x y = 1 - x*y diff xs = zipWith (-) (tail xs) $ xs bOP g n = sum.map last.take n.iterate diff.take n.ma\u2026","version":"1.0","width":"100%"}