#include using namespace std; using ll=long long; using ld=long double; const ll ILL=2167167167167167167; const int INF=2100000000; #define rep(i,a,b) for (int i=(int)(a);i<(int)(b);i++) #define all(p) p.begin(),p.end() template using _pq = priority_queue, greater>; template ll LB(vector &v,T a){return lower_bound(v.begin(),v.end(),a)-v.begin();} template ll UB(vector &v,T a){return upper_bound(v.begin(),v.end(),a)-v.begin();} template bool chmin(T &a,T b){if(a>b){a=b;return 1;}else return 0;} template bool chmax(T &a,T b){if(a void So(vector &v) {sort(v.begin(),v.end());} template void Sore(vector &v) {sort(v.begin(),v.end(),[](T x,T y){return x>y;});} bool yneos(bool a,bool upp=0){if(a){cout<<(upp?"YES\n":"Yes\n");}else{cout<<(upp?"NO\n":"No\n");}return a;} template void vec_out(vector &p,int ty=0){ if(ty==2){cout<<'{';for(int i=0;i<(int)p.size();i++){if(i){cout<<",";}cout<<'"'< T vec_min(vector &a){assert(!a.empty());T ans=a[0];for(auto &x:a) chmin(ans,x);return ans;} template T vec_max(vector &a){assert(!a.empty());T ans=a[0];for(auto &x:a) chmax(ans,x);return ans;} template T vec_sum(vector &a){T ans=T(0);for(auto &x:a) ans+=x;return ans;} int pop_count(long long a){int res=0;while(a){res+=(a&1),a>>=1;}return res;} template bool inside(T l,T x,T r){return l<=x&&x> t; rep(i, 0, t) solve(); } void solve(){ ll N, K; cin >> N >> K; auto dist = [&](ll x1, ll y1, ll x2, ll y2) -> bool { return K * K >= (x1 - x2) * (x1 - x2) + (y1 - y2) * (y1 - y2); }; vector X(N), Y(N); vector ans(N, 1); vector H(N); rep(i, 0, N) cin >> H[i]; rep(i, 0, N){ cin >> X[i] >> Y[i]; } rep(i, 0, N){ rep(j, 0, i){ if (dist(X[i], Y[i], X[j], Y[j])){ if (H[i] > H[j]) ans[j] = 0; if (H[i] < H[j]) ans[i] = 0; } } } cout << vec_sum(ans) << "\n"; }