ceil :: Int -> Int -> Int
ceil a b = a + b + 1 `div` a

main :: IO ()
main = interact $ show . solve . map read . words

solve :: [Int] -> Int
solve (a:b:_) = ceil a b