{"author_name":"jeneshicc","width":"100%","image_url":null,"published":"2008-11-25 23:18:53","blog_title":"\u843d\u66f8\u304d\u3001\u6642\u3005\u843d\u5b66","blog_url":"https://jeneshicc.hatenadiary.org/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fjeneshicc.hatenadiary.org%2Fentry%2F20081125%2F1227622733\" title=\"Problem 106 - \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":["Project Euler","Haskell"],"type":"rich","provider_url":"https://hatena.blog","version":"1.0","height":"190","title":"Problem 106","author_url":"https://blog.hatena.ne.jp/jeneshicc/","description":"http://projecteuler.net/index.php?section=problems&id=106\u3068\u308a\u3042\u3048\u305a\u554f\u984c\u6587\u3092\u7406\u89e3\u3059\u308b\u306e\u306b\u3059\u3054\u3044\u6642\u9593\u304c\u304b\u304b\u3063\u305f\u3002 \u306a\u3093\u3067\u3001n=4\u306725\u306b\u306a\u308b\u306e\u304b\u5206\u304b\u3089\u306a\u304b\u3063\u305f\u3002 \u3068\u308a\u3042\u3048\u305a\u539f\u56e0\u306f \u554f\u984c\u6587\u304c\u3069\u3053\u307e\u3067\u30ea\u30b9\u30c8\u306e\u8981\u7d20\u304c\u6607\u9806\u3067\u3042\u308b\u4eee\u5b9a\u3092\u3064\u304b\u3063\u3066\u3044\u308b\u306e\u304b \u660e\u8a18\u3057\u3066\u306a\u304b\u3063\u305f\u70b9\u306b\u3042\u308b\u3068\u601d\u3046\u3002 \uff08\u3068\u3001\u554f\u984c\u6587\u306e\u305b\u3044\u306b\u3057\u3066\u307f\u308b\u3002\uff09 import Data.List needTest (x,y) = (or $ zipWith (>) x y)&&(or $ zipWith (<) x y) divid (x:xs) = [(x:ys,xs\\\\ys)|ys<-co\u2026","provider_name":"Hatena Blog","url":"https://jeneshicc.hatenadiary.org/entry/20081125/1227622733"}