Problem:
スパイダー人

正義のヒーロー「スパイダー人」は、腕からロープを出してビルからビルへ飛び移ることができます。しかし、ロープが短いので自分からの距離が 50 以下のビルにしか移動できません。それより遠くのビルに移動するには、一旦別のビルに飛び移らなくてはなりません。

ビルの数 n、n 個のビルの情報、スパイダー人の移動開始位置及び目的地を入力とし、その移動の最短経路を出力するプログラムを作成してください。どのようにビルを経由しても目標のビルに移動できない場合は NA と出力してください。各ビルは点として扱い、最短距離で移動するビルの経由方法が２つ以上存在することはないものとします。

Input

複数のデータセットの並びが入力として与えられます。入力の終わりはゼロひとつの行で示されます。
各データセットは以下の形式で与えられます。

n
b1 x1 y1
b2 x2 y2
:
bn xn yn
m
s1 g1
s2 g2
:
sm gm

１行目にビルの数 n (1 ≤ n ≤ 100)、続く n 行に i 番目のビルのビル番号 bi (1 ≤ bi ≤ n)、そのビルのx座標とy座標を表す整数 xi, yi (-1000 ≤ xi, yi ≤ 1000) が空白区切りで与えられます。

続く行に移動情報の個数 m (1 ≤ m ≤ 100)、続く m 行にi 番目の移動情報が与えられます。各移動情報として、移動を開始するビルの番号 si と目的地ビルの番号 gi が空白区切りで与えられます。

データセットの数は 10 を超えません。

Output

入力データセットごとに次の形式で出力します。

i 行目に i 番目の移動情報に対する経路または NA を１行に出力します。各経路は以下の形式で出力します。

si bri1 bri2 ... gi

brij は i 番目の移動情報における、j 番目に経由するビルの番号を表します。

Sample Input

4
1 0 0
2 30 0
3 60 40
4 0 60
2
1 3
1 4
22
1 0 0
2 150 40
3 30 20
4 180 150
5 40 80
6 130 130
7 72 28
8 172 118
9 50 50
10 160 82
11 90 105
12 144 131
13 130 64
14 80 140
15 38 117
16 190 90
17 60 100
18 100 70
19 130 100
20 71 69
21 200 110
22 120 150
1
1 22
0

Output for the Sample Input

1 2 3
NA
1 3 9 20 11 6 22

Solution in Ruby (judge verdict: Accepted)

### constant

ROPE2 = 50 * 50

### main

while true
  n = gets.strip.to_i
  break if n == 0

  bldgs = []
  bids = {}

  (0...n).each do |i|
    b, x, y = gets.strip.split(' ').map{|s| s.to_i}
    bldgs[i] = [b, x, y]
    bids[b] = i
  end

  edges = Array.new(n){Array.new(n){nil}}

  for i in (0...n)
    bi, xi, yi = bldgs[i]
    for j in ((i + 1)...n)
      bj, xj, yj = bldgs[j]
      d2 = (xi - xj) ** 2 + (yi - yj) ** 2
      if d2 <= ROPE2
        edges[i][j] = edges[j][i] = Math.sqrt(d2)
      end
    end
  end

  nbrs = Array.new(n){[]}

  for i in (0...n)
    nbrs[i] = (0...n).select{|j| ! edges[i][j].nil?}
  end

  m = gets.strip.to_i

  m.times.each do
    s, g = gets.strip.split(' ').map{|s| s.to_i}

    dist = (0...n).map{Float::INFINITY}
    dist[bids[s]] = 0.0
    prev = []
    queue = (0...n).map{|i| i}

    while ! queue.empty?
      u = queue.min{|a, b| dist[a] <=> dist[b]}
      queue.delete u

      for v in nbrs[u]
        ndist = dist[u] + edges[u][v]
        if dist[v].nil? || dist[v] > ndist
          dist[v] = ndist
          prev[v] = u
        end
      end
    end

    v = bids[g]
    if dist[v] == Float::INFINITY
      puts "NA"
    else
      rt = []
      while ! v.nil?
        rt << bldgs[v][0]
        v = prev[v]
      end

      puts rt.reverse.join(' ')
    end
  end
end