【題目】如果乙個數的所有真因子（不包含它自身的因子）之和恰等於其自身，則該數為完全數，也稱為完美數（perfect number）。完全數有許多奇妙的性質。但它們很稀少，你來求前幾個吧。最小的乙個是 6，因為： 6 = 1 + 2 + 3
這個完全數的定義已經很清楚了，如果沒有什麼妙法，就地毯式搜尋也可以。下法就是：
yin_zi :
:int
-> [int]
yin_zi n = [ x | x <
- [1..n-
1], n `mod` x =
=0 ]
wan_quan :
: [int]
wan_quan = [ x | x <
- [3..],
(sum . yin_zi) x =
= x]
main =
print $ take 3 wan_quan
haskell 基礎題解（07）
題目 11 1 1 2 1 1 3 3 1 1 4 6 4 1 這個陣勢叫楊輝三角，國外叫帕斯卡三角。前一行的數字中，每兩個相鄰的數字相加就得到下一行的數字。左右兩邊的數永遠是 1 寫個程式，輸出前幾行的楊輝三角。import data.list intersperse yang hui int y...
haskell基礎題解（14）
題目 用自然數蛇形填充乙個 n 階的方陣。當n 5時，形如 這個問題用 haskell 解決時與 題目13 差別甚微。實際上，從函式式的思考習慣看，只要讓有些行作成後反轉一下就可以了。上 ju n f x x 0.n 1 where f row even row take n row n 1.odd...
haskell 基礎題解（15）
題目 用自然數以螺旋的方式填充乙個nxn的方陣。當n 5時，形如 這個問題對函式式語言是有點小難度。如果是命令式的，可以建乙個陣列，不斷地賦值，改變陣列的狀態，最後把陣列裝滿了就ok。但函式式風格沒有狀態，沒有賦值，只有定義而已。如果仍堅持仿照命令式風格，也可以做。用乙個函式，接受舊陣列，要填入的數...