read*,I print*,i-1 end