#include<cstdio>
#include<cstdlib>
#include<cmath>
#include<cstring>
#include<cctype>
#include<complex>
#include<iostream>
#include<sstream>
#include<algorithm>
#include<functional>
#include<vector>
#include<string>
#include<stack>
#include<queue>
#include<map>

using namespace std;
const int dx[] = {1,0,-1,0},dy[] = {0,1,0,-1};
#define INF 10000000
#define rep(i,j) for(int i=0;i<(j);++i)
#define reps(i,j,k) for(int i=j;i<k;++i)
typedef long long ll;
typedef unsigned long long ull;

double cost[1000][1000];
int d[1000];
bool used[1000];
int prev[1000];
int V;

void dijkstra(int s){
	fill(d,d+V,INF);
	fill(used,used+V,false);
	fill(prev,prev+V,-1);
	d[s] = 0;
	while(true){
		int v = -1;
		rep(i,V)if(!used[i] && (v == -1 || d[i] < d[v]))v = i;
		if(v == -1)break;
		used[v] = true;
		rep(i,V){
			if(d[i] > d[v] + cost[v][i]){
				d[i] = d[v] + cost[v][i];
				prev[i] = v;
			}
		}
	}
	return ;
}

vector<int> get_path(int t){
	vector<int> path;
	for(; t != -1; t = prev[t])path.push_back(t);
	reverse(path.begin(),path.end());
	return path;
}

int main(){
	int n;
	while(scanf("%d",&n),n){
		rep(i,1000)rep(j,1000)cost[i][j] = INF;
		int num[12800]={0},x[12800]={0},y[12800]={0};
		rep(i,n){
			scanf("%d%d%d",&num[i],&x[i],&y[i]);
			num[i]--;
		}
		rep(i,n){
			reps(j,i+1,n){
				double dis = sqrt(((x[i]-x[j])*(x[i]-x[j]))+((y[i]-y[j])*(y[i]-y[j])));
				cost[i][j] = (dis > 50) ? INF : dis;
				cost[j][i] = (dis > 50) ? INF : dis;
			}
		}
		V = n;
		int m;
		scanf("%d",&m);
		rep(i,m){
			vector<int> ans;
			int from,to;
			scanf("%d%d",&from,&to);
			from--;to--;
			dijkstra(from);
			ans = get_path(to);
			int len = ans.size();
			if(len == 1)puts("NA");
			else{
				rep(i,len-1)printf("%d ",ans[i]+1);
				printf("%d\n",ans[len-1]+1);
			}			
		}
	}
	return 0;
}