import Data.Maybe
main :: IO()
main = do
  line <- getLine
  if null line
     then return ()
     else do
       let [a,op,b] = words line
       let res = calc (read a ::Int) op (read b ::Int)
       case res of Nothing -> return ()
                   x -> print $ fromJust x
       main

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