import Control.Applicative
main = do
    [a, op, b] <- words <$> getLine
    putAnswer $ calc a op b

putAnswer :: Maybe Int -> IO ()
putAnswer Nothing = putStr ""
putAnswer (Just x) = do
    putStrLn $ show x
    [a, op, b] <- words <$> getLine
    putAnswer $ calc a op b

calc :: String -> String -> String -> Maybe Int
calc _ "?" _ = Nothing
calc sa op sb
    | op == "+" = Just $ a + b
    | op == "-" = Just $ a - b
    | op == "*" = Just $ a * b
    | op == "/" = Just $ a `div` b
    where
        a = read sa :: Int
        b = read sb :: Int