#include <iostream>
#include <cstdio>
#include <cmath>
#include <cstring>
#include <cstdlib>

using namespace std;
const int maxn=100;
const int maxm=10000;
const int oo=2000000000;


struct 
{
	int x,y,z;
	bool safe;
}p[51];

int f[51][51];
int d[maxn],vd[maxn],ans;

struct edge
{
	int t,c,v;
	edge *next,*op;
}E[10000],*V[51];
int eh;
inline void addedge(int a,int b,int c)
{
	E[++eh].next=V[a];  V[a]=E+eh; V[a]->c = c; V[a]->t=b;
	E[++eh].next=V[b];  V[b]=E+eh; V[b]->c = 0; V[b]->t=a;
	V[a]->op=V[b];  V[b]->op=V[a];
}

int n,m,r,S,T,maxmax;

void init()
{
	scanf("%d%d%d",&n,&m,&r);
	S=0;T=n+1;
	for (int i=1;i<=n;i++)
	{
		scanf("%d%d%d",&p[i].x,&p[i].y,&p[i].z);
		if (p[i].x*p[i].x+p[i].y*p[i].y+p[i].z*p[i].z>r*r) 
		{	
			p[i].safe=true;
			addedge(i,T,oo);
		}
	}
	int a,b;
	for (int i=1;i<=m;i++)
	{
		scanf("%d%d",&a,&b);
		f[a][b]=(p[a].x-p[b].x)*(p[a].x-p[b].x)+(p[a].y-p[b].y)*(p[a].y-p[b].y)+(p[a].z-p[b].z)*(p[a].z-p[b].z);
		maxmax+=f[a][b];
		addedge(a,b,f[a][b]);
		addedge(b,a,f[a][b]);
	}
}

int dfs(int u,int flow)
{
	int now=0;
	if (u==T) return flow;
	for (edge *e=V[u];e;e = e->next)
	{
		int v=e->t;
		if (e->c > 0 && d[u]==d[v]+1)
		{
			int t=dfs(v,min(flow-now,e->c));
			if (t)
			{
				e->c -= t;
				e->op->c += t;
				now += t;
				if (now==flow) return now;
			}
		}
	}
	if (d[S]>=n) return now;
	if (--vd[d[u]]==0) d[S]=n;
	vd[++d[u]]++;
	return now;
}

void SAPflow()
{
	n=n+2;
	vd[0]=n;
	while (d[S]<n)
	ans+=dfs(S,oo);
}

int main()
{
	freopen("starwar.in","r",stdin);
	freopen("starwar.out","w",stdout);
	init();
	SAPflow();
	printf("%d\n",ans);
}