摘要: 今天孩子问100以内的勾股数,正好用上刚学的Haskell语言,一行语句搞定! [(x,y,z) | x-[1..100], y-[x..100], z-[y..100], x*x + y*y == z*z] 阅读全文
posted @ 2012-10-18 19:42 申龙斌的程序人生 阅读(1082) 评论(0) 推荐(0) 编辑