main = do
  n <- words <$> getLine
  let l = read $ head n
  let op = head $ tail n
  let r = read $ last n
  putStrLn $ biop op l r
  
biop :: String -> Int -> Int -> String
biop o l r
  | o == "+" = show $ l + r
  | o == "-" = show $ subtract r l
  | otherwise = undefined