main = do
    n <- getLine
    printTestCases 1 n

printTestCases :: Int -> String -> IO ()
printTestCases index "0" = putStr ""
printTestCases index number = do
    putStrLn $ "Case " ++ show(index) ++ ": " ++ number
    next <- getLine
    printTestCases (index + 1) next