module Main where

import Data.Bool

main :: IO ()
main = do
  { [a,b] <- getInts
  ; case b `divMod` a of
      (d,r) -> print $ bool (succ d) d (r == 0)
  }

getInts :: IO [Int]
getInts = map read . words <$> getLine