写一个函数求，返回s以内所有3或5的倍数的和。
整数 s
由于方法二数学味道较浓所以我们选择第一种书写代码。
fn s = sum [ x | x <- [ 1..s-1 ] , mod x 3 == 0 || mod x 5 == 0 ]
[极短]数字求和
原文：https://www.cnblogs.com/jhy16193335/p/11329904.html
