main = do
  ab <- getLine
  let [a,b] = map read $ words ab
  let x = f a b
  print x

f a b = let (p,q) = divMod b a in if q == 0 then p else p+1