program T01
    implicit none
    real::b,a
    read(*,*)a,b
        if(mod(a,b)==0)then
            write(*,*)int(a/b)
        else
            write(*,*)int((a/b)+1)
        end if
end program T01