import Text.Printf(printf)
import System.Exit

main = do
    cs <- getLine
    let (x:y:z:_) = words cs
    case y of "+" -> printf "%d\n" $ (ri x) + (ri z)
              "-" -> printf "%d\n" $ (ri x) - (ri z)
              "*" -> printf "%d\n" $ (ri x) * (ri z)
              "/" -> printf "%.0f\n" $ (fr x) / (fr z)
              "?" -> exitSuccess
              _   -> die "UNKNOWN PATTERN"
    main
    where ri = read :: String -> Int
          fr = read :: String -> Double
