main = do
    str <- getLine
    let (lhd:op:rhd:_) = words str
    if op == "?" then
        return ()
    else do
        print $ solve op (read lhd) (read rhd)
        main

solve :: Integral a => String -> (a -> a -> a)
solve "+" = (+)
solve "-" = (-)
solve "*" = (*)
solve "/" = div