use proconio::input;

fn main() {
    input! {
        n: usize, k: usize,
        h: [usize; n],
        pos: [(usize, usize); n]
    }
    let k2 = k * k;

    let is_neighbor = |i: usize, j: usize| {
        let (x_i, y_i) = pos[i];
        let (x_j, y_j) = pos[j];
        let dx = x_i.abs_diff(x_j);
        let dy = y_i.abs_diff(y_j);
        dx * dx + dy * dy <= k2
    };

    let mut disappear = vec![false; n];
    for i in 0..n {
        for j in 0..i {
            if h[i] == h[j] {
                continue;
            }
            let (i, j) = if h[i] < h[j] { (i, j) } else { (j, i) };
            if is_neighbor(i, j) {
                disappear[i] = true;
            }
        }
    }

    let ans = disappear.iter().filter(|&&b| !b).count();
    println!("{ans}");
}