haskell 基础题解（05）

分解质因数

【题目】给一个数，求它的质因数分解形式
例如：10 = 2 * 2 * 5
看起来需要一个所有质数的表，从小到大，每一个不断去试除那个给定的数，除开了，它就是一个合格的质因数。。。。。
实际上也可以递归地思考，依次从 2,3,4… 中找一个数x去试除N，如果能除开，x收入囊中，然后接着求N/x 的所有质因数就可以了。
之所以不用质数列试除也可以，是因为：假如某个合数可除尽，那么它的质数因子比它小，会先于它起作用。。。

fen :: Int -> [Int]
fen n = f [2..n] where
  f (x:xs) | n `mod` x =