{"title":"\u30d1\u30b9\u30ab\u30eb\u306e\u4e09\u89d2\u5f62\u3068\u30b7\u30a7\u30eb\u30d4\u30f3\u30b9\u30ad\u30fc\u306e\u30ae\u30e3\u30b9\u30b1\u30c3\u30c8","blog_url":"https://jeneshicc.hatenadiary.org/","provider_name":"Hatena Blog","url":"https://jeneshicc.hatenadiary.org/entry/20081215/1229352137","published":"2008-12-15 23:42:17","image_url":null,"description":"\u30d1\u30b9\u30ab\u30eb\u306e3\u89d2\u5f62\u306f\u6b21\u306e\u30b3\u30fc\u30c9\u3067\u751f\u6210\u3067\u304d\u308b\u3002 pascal = iterate next [1] where next xs = zipWith (+) (0:xs) (xs++[0]) showPascal n = mapM_ print.take n$pascal *Main> showPascal 10\u3068\u3059\u308c\u3070\u3001\u6b21\u306e\u3088\u3046\u306a\u30d1\u30b9\u30ab\u30eb\u306e\u4e09\u89d2\u5f62\u304c\u5f97\u3089\u308c\u308b\u3002 [1] [1,1] [1,2,1] [1,3,3,1] [1,4,6,4,1] [1,5,10,10,5,1] [1,6,15,20,15,6,1] [1,7,21,35,35,21,7,1] [1,8,28,56,70,56,28,8,1]\u2026","type":"rich","author_url":"https://blog.hatena.ne.jp/jeneshicc/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fjeneshicc.hatenadiary.org%2Fentry%2F20081215%2F1229352137\" title=\"\u30d1\u30b9\u30ab\u30eb\u306e\u4e09\u89d2\u5f62\u3068\u30b7\u30a7\u30eb\u30d4\u30f3\u30b9\u30ad\u30fc\u306e\u30ae\u30e3\u30b9\u30b1\u30c3\u30c8 - \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>","author_name":"jeneshicc","categories":["\u5b66\u554f","Haskell"],"version":"1.0","provider_url":"https://hatena.blog","blog_title":"\u843d\u66f8\u304d\u3001\u6642\u3005\u843d\u5b66","height":"190","width":"100%"}