import Control.Applicative
main = do
	[a,b] <- map read . words <$> getLine
	print $ div (b+a-1) a