import Control.Applicative

calc :: Integer -> String -> Integer -> Integer
calc a "+" b = a + b
calc a "-" b = a - b
calc a "*" b = a * b
calc a "/" b = a `div` b

parser :: IO ()
parser = do
    args <- words <$> getLine
    if (args !! 1 == "?")
    then return ()
    else do
        putStrLn (show (calc (read (args !! 0)) (args !! 1) (read (args !! 2))))
        parser

main = parser