sToHms s = show(s `div` 3600) ++ ":" ++ show(s `mod` 3600 `div` 60) ++ ":" ++ show(s `mod` 3600 `mod` 60)

main = do
	second <- getLine
	let second_int = read second :: Int
	putStrLn $ sToHms second_int