main :: IO ()
main = do
  [a,b] <- reads2List
  putStrLn $ solve a b

solve :: Int -> Int -> String
solve a b | a `mod` 3 == 0 = "Possible"
          | b `mod` 3 == 0 = "Possible"
          | (a + b) `mod` 3 == 0 = "Possible"
          | otherwise = "Impossible"


s2List :: Read a => String -> [a]
s2List = fmap read . words

reads2List :: Read a => IO [a]
reads2List = do
  s <- getLine
  return (s2List s)
