l n = sum $ filter (\x -> x > 30 && x `mod` 5 == 0) $ take n [1..] main = print $ l 40
Standard input is empty
75
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!