import Control.Applicative ((<$>)) import Text.Printf main :: IO () main = solve <$> readLn >>= putStrLn solve :: Int -> String solve a = let (h, m) = (3 * a `div` 5) `divMod` 60 in printf "%d:%02d" (10 + h) m