main :: IO () main = interact $ (++ "\n") . show . (\[a, b] -> (b + a - 1) `div` a) . map read . words