module Main where

import Control.Applicative
import Control.Monad
import Data.List
import Text.Printf
import Numeric

main :: IO ()
main = do
  set<-map words.init.lines<$>getContents
  mapM_ (print . solve) set

solve :: [String]->Int
solve [a,op,b]
  | op == "+" = read a + read b
  | op == "-" = read a - read b
  | op == "*" = read a * read b
  | op == "/" = read a `div` read b