program rating_test
	implicit none
    integer:: point, rank

	read(*,*) point
    if (point<400 .or. point>2000) then
        write(0,*) 'Error: input invalid point'
        stop
    end if
    write (*,'(i0)') 9-(point-200)/200
end program rating_test