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