import Prelude

main :: IO ()
main = do
  [a, b] <- map read . words <$> getLine
  print $ calc a b

calc :: Int -> Int -> Int
calc a b = let lt = div b a
               dt = mod b a
           in  lt + if dt > 0 then 1 else 0