program T01 integer::a,b read(*,*)a,b write(*,*)int(a/b)+1 end program T01