main = do
    [a, b] <- map (read :: String -> Integer) . words <$> getLine
    let l = iterate (\n -> a * n + b) 0
    print $ if (l !! 1 == 0) then 1 else if (l !! 2 == 0) then 2 else -1