Go: package main

import (
	"bufio"
	"os"
	"strconv"
	"strings"
	"math"
	"fmt"
)

var scanner = bufio.NewScanner(os.Stdin)

func main() {
	dd := make([][]int, 1000)
	for i := range dd {
		dd[i] = make([]int, 1000)
	}
	num := make([]int,1000)
	inv := make([]int, 1001)
	x := make([]int, 1000)
	y := make([]int, 1000)
	vv := make([]int, 1000)
	nowt := make([]float64, 1000)
	rev := make([]int, 1000)
	for scanner.Scan() {
		n, _ := strconv.Atoi(scanner.Text())
		if n == 0 {
			break
		}
		for i := 0; i < n; i++ {
			scanner.Scan()
			buf1 := strings.Split(scanner.Text(), " ")
			num[i], _ = strconv.Atoi(buf1[0])
			x[i], _ = strconv.Atoi(buf1[1])
			y[i], _ = strconv.Atoi(buf1[2])
			inv[num[i]] = i
		}
		for i := 0; i < n; i++ {
			for j := 0; j < n; j++ {
				dd[i][j]=(x[i]-x[j])*(x[i]-x[j])+(y[i]-y[j])*(y[i]-y[j])
			}
		}
		scanner.Scan()
		m, _ := strconv.Atoi(scanner.Text())
		for i := 0; i < m; i++ {
			scanner.Scan()
			buf2 := strings.Split(scanner.Text(), " ")
			c, _ := strconv.Atoi(buf2[0])
			d, _ := strconv.Atoi(buf2[1])
			c = inv[c]
			d = inv[d]
			for j := 0; j < n; j++ {
				vv[j] = 0
				nowt[j]=999999999
				rev[j]=-1
			}
			nowt[c]=0
			for j := 0; j < n; j++ {
				M := 99999999
				at := 0
				for k := 0; k < n; k++ {
					if vv[k] == 0 && float64(M) > nowt[k] {
						M=int(nowt[k])
						at = k
					}
				}
				if M > 90000000 {
					break
				}
				vv[at]=1
				for k := 0; k < n; k++ {
					if vv[k] == 0 && dd[at][k]<=2500&&nowt[k]>nowt[at]+math.Sqrt(float64(dd[at][k])) {
						nowt[k]=nowt[at]+math.Sqrt(float64(dd[at][k]))
						rev[k] = at
					}
				}
			}
			if vv[d] == 0 {
				fmt.Println("NA")
			} else {
				stack := make([]int, 0)
				V := d
				for V != c {
					stack = append(stack, V)
					V = rev[V]
				}
				fmt.Print(num[c])
				for len(stack) > 0 {
					fmt.Printf(" %d", num[stack[len(stack)-1]])
					stack = stack[:len(stack)-1]
				}
				fmt.Println()
			}
		}
	}
}

C++: #include <iostream>
#include <algorithm>
#include <string>
#include <vector>
#include <stack>
#include <queue>
#include <cstring>
#include <climits>
#include <cmath>
#include <cfloat>

#define FOR(i,b,n) for(int i=b;i<n;i++)
#define CLR(mat) memset(mat, 0, sizeof(mat))

using namespace std;

int n, x[1001], y[1001], m, s[1001], g[1001], pre[1001];
double amt[1001][1001], vtx[1001];

queue<int> que;
stack<int> out;

int main()
{
	while( cin >> n, n)
	{
		CLR(amt);

		FOR(i, 0, n)
		{
			int b;
			cin >> b >> x[i] >> y[i];
		}

		cin >> m;

		FOR(i, 0, m)
		{
			cin >> s[i] >> g[i];
			s[i]--;g[i]--;
		}

		FOR(j, 0, n)
			FOR(i, j, n)
			{
				if( i != j )
				{
					double dis =  sqrt( pow((double)(x[i] - x[j]), 2) + pow((double)(y[i] - y[j]), 2) );

					if(dis <= 50.0)
					{
						amt[j][i] = dis;
						amt[i][j] = dis;
					}
				}
			}
		
		FOR(k, 0, m)
		{
			que.push(s[k]);

			FOR(i, 0, n)
			{
				vtx[i] = DBL_MAX;
			}
		
			vtx[s[k]] = 0;

			while(!que.empty())
			{
				int now = que.front();
				que.pop();

				FOR(tg, 0, n)
				{
					if( amt[now][tg] > 0 && now != tg && vtx[now] + amt[now][tg] < vtx[tg] )
					{
						vtx[tg] = vtx[now] + amt[now][tg];
						pre[tg] = now;
						que.push(tg);
					}
				}

			}

			if( vtx[g[k]] == DBL_MAX )
			{
				cout << "NA" <<endl;
			}
			else
			{
				int now = g[k];
				
				while( now != s[k] )
				{
					out.push(pre[now]);
					now = pre[now];
				}

				while( !out.empty() )
				{
					cout << out.top()+1 << " ";
					out.pop();
				}

				cout << g[k]+1 << endl;
			}
		}


	}

	return 0;

}

C++: #include <iostream>
#include <cstdio>
#include <cstring>
#include <algorithm>
#include <vector>
#include <cmath>
using namespace std;

#define MAX 1100
#define INF (1<<29)
#define EPS 1e-9

struct Point{
  int x, y, id;
};

vector<Point> bill;
double dist[MAX][MAX];

int V;

void init(){
  bill.clear();
  for(int i = 0 ; i < MAX ; i++){
    for(int j = 0 ; j < MAX ; j++){
      dist[i][j] = INF;
      if(i == j) dist[i][j] = 0;
    }
  }
}

int prev[MAX];
void dijkstra(int s){
  int d[MAX];
  bool used[MAX];
  for(int i = 0 ; i < MAX ; i++){
    d[i] = INF;
    used[i] = false;
    prev[i] = -1;
  }
  //fill(d, d+MAX, INF);
  //fill(used, used+MAX, false);
  //fill(prev, prev+MAX, -1);
  d[s] = 0;
  
  while(true){
    int v = -1;
    for(int u = 0 ; u < V ; u++){
      if(!used[u] && (v == -1 || d[u] < d[v])) v = u;
    }
    if(v == -1) break;
    used[v] = true;
    
    for(int u = 0 ; u < V ; u++){
      if(d[u] > d[v] + dist[v][u]){
	d[u] = d[v] + dist[v][u];
	prev[u] = v;
      }
    }
  }
}

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;
}

double getDist(int from, int to){
  double ret = sqrt(( ((bill[from].x - bill[to].x)*(bill[from].x - bill[to].x)) +
			     ((bill[from].y - bill[to].y)*(bill[from].y - bill[to].y)) ) );
  return ret;
}
  
int main(){
  while(cin >> V, V){
    bill.clear();
    init();
    //Point p;
    int B[MAX], X[MAX], Y[MAX];
    for(int i = 0 ; i < V ; i++){
      cin >> B[i] >> X[i] >> Y[i];
      B[i]--;
      //cin >> p.id >> p.x >> p.y;
      //p.id--;
      //bill.push_back(p);
    }
    
    for(int i = 0 ; i < V ; i++){
      for(int j = i ; j < V ; j++){
	if(i == j) continue;
	double d = sqrt( (X[i]-X[j])*(X[i]-X[j]) + (Y[i]-Y[j])*(Y[i]-Y[j]) );
	//double distance = getDist(bill[i].id, bill[j].id);
	//if(dis >= 50 + EPS) continue;
	//if(distance <= 50.0 + EPS){
	//dist[bill[i].id][bill[j].id] = dist[bill[j].id][bill[i].id] = distance;
	if(d <= 50.0){
	  dist[B[i]][B[j]] = dist[B[j]][B[i]] = d;
      }
      }
    }
    int m;    
    cin >> m;
    int s, g;
    for(int cs = 0 ; cs < m ; cs++){
      cin >> s >> g;
      s--, g--;
      dijkstra(s);
      vector<int> ans_path;
      ans_path = get_path(g);
      if(ans_path.size() <= 1) cout << "NA" << endl;
      else{
	for(int i = 0 ; i < (int)ans_path.size() ; i++){
	  if(i == (int)ans_path.size()-1) cout << ans_path[i]+1 << endl;
	  else cout << ans_path[i]+1 << ' ';
	}
      }
      ans_path.clear();
    } 
  }
  return 0;
}