program main
    implicit none
    integer n,i,ans
    real(8) x,y,d
    read(*,*)n,d
    ans=0
    do i=1,n
        read(*,*)x,y
        if(sqrt(x**2+y**2)<=d)then
            ans=ans+1
        endif
    enddo
    write(*,*)ans
end program main
