program W implicit none integer::S,F read*,S,F print"(i0)",S/F+1 end program W