let () =
  Scanf.scanf "%d %f\n" @@ fun n d ->
  let arr = Array.init n @@ fun _ -> Scanf.scanf "%f %f\n" @@ fun x y -> (x,y) in
  let ans = Array.fold_left 
      (fun ans (x,y) -> if sqrt (x ** 2. +. y ** 2.) <= d then ans + 1 else ans) 0 arr in
  Printf.printf "%d\n" ans