-- yukicoder My Practice -- author: Leonardone @ NEETSDKASU main = readLn >>= print . f where d x = (div x 3) + (div x 5) f = (*) 2 . d