import Control.Applicative
import Data.List

main = do
  [a, b] <- (map read).words <$> getLine :: IO [Int]
  let c = (a - b)
  if even c then print $ abs (a - (c `div` 2)) else putStrLn "IMPOSSIBLE"
