main = getLine >>= print . f . map (read :: String -> Int) . words where f [a,b] | snd dm /= 0 = fst dm + 1 | otherwise = fst dm where dm = b `divMod` a