{-# LANGUAGE OverloadedStrings #-}
import Prelude hiding (getLine, words)

import Data.ByteString.Char8 as BC
import Data.Maybe (fromJust)

solve :: ByteString -> Int
solve input =
    let [num0, op, num1] = words input
        in (parseOp op) (parseInt num0) (parseInt num1)

parseInt :: ByteString -> Int
parseInt = fst . fromJust . readInt

parseOp :: Num a => ByteString -> (a -> a -> a)
parseOp op = case op of
                  "+" -> (+)
                  "-" -> (-)


main = getLine >>= print . solve