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