import qualified Data.Text as T import qualified Data.Text.IO as TI import Control.Applicative main = do list<-fmap (read.T.unpack)<$>T.split (==' ')<$>TI.getLine putStrLn$show$ceiling$list!!1/list!!0