import           Control.Applicative

main :: IO ()
main = do
  input <- getLine
  case eval input of
    Nothing -> pure ()
    Just n  -> print n >> main

eval :: String -> Maybe Integer
eval input = result
  where
    [a',op,b'] = words input
    a = read a'
    b = read b'
    result = case op of
      "+" -> Just $ a + b
      "-" -> Just $ a - b
      "*" -> Just $ a * b
      "/" -> Just $ a `div` b
      _   -> Nothing


