import Prelude main :: IO () main = do [s, f] <- map read . words <$> getLine print $ calc s f calc :: Int -> Int -> Int calc s f = div s f + 1