import Control.Applicative

main :: IO ()
main = solve <$> f >>= putStrLn
  where
    f = map read <$> words <$> getLine

solve :: [Int] -> String
solve [a, b]
  | even w = show $ w `div` 2
  | otherwise = "IMPOSSIBLE"
  where
    w = a + b
