import Control.Monad
import Control.Applicative
import Data.List

main :: IO ()
main = do
  [n,m] <- map read . words <$> getLine
  putStrLn . show $ solve n m

solve :: (Integral b, RealFrac r) => r -> r -> b
solve a b = ceiling $ b / a