calc a op b = case op of
	"+" -> a + b
	"-" -> a - b
	"*" -> a * b
	"/" -> a `div` b

main = do
	[sa, op, sb] <- fmap words getLine
	if op == "?" then
		return ()
	else do
		let [a, b] = map read [sa, sb] :: [Int]
		print $ calc a op b
		main