main :: IO ()
main = do
  (a:b:_) <- map read . words <$> getLine
  print $ solve' a b

solve a b = snd $ head $ dropWhile (\(x,y) -> b > x) [(n*a-n+1, n) | n <- [1..]]

solve' a b = ceiling ((b - 1) / (a - 1))
