f n = (*) 2 $ (n `div` 3) + (n `div` 5)

main = getLine >>= print . f . read