main = do
 [n,m] <- map read . words <$> getLine :: IO [Int]
 if n<=m then print 1 else print (-1)