2520是最小的可被从1到10以内的数整除的数，求可被从1到20以内的数整除的最小正整数
公倍数 [] = 1
公倍数 (素数:递增数列) = 素数 * (公倍数 $ map lambda 递增数列)
where lambda = \n->if n `mod` 素数==0 then n `div` 素数 else n
answer = 公倍数 [1..20]
在车上弄懂了如何求两个数的最小公倍数，然后推广到多个数的最小公倍数，再使用筛法的思想优化算法，即得。
只能应用于+1递增数列。
任意自然数列请用：
foldl (lcm) 1 [1..20]
