import           Control.Monad
import           Data.IORef
import           Data.List.Split
import           Data.Maybe
import           Data.List

main :: IO ()
main = do
  [a, op, b] <- words <$> getLine
  print $ case op of
    "+" -> toInt a + toInt b
    "-" -> toInt a - toInt b
    _ -> error "error"
  where
    toInt s = read s :: Int