Problem:
ぴょん吉の夏

会津大学には一面芝生で覆われた公園があり、日差しを遮る木や建物がありません。日差しの強い夏の日には、公園内に設置されたスプリンクラーが作動して芝生に散水しています。この公園にはカエルのぴょん吉が住み着いています。ぴょん吉は暑いのが苦手で、日差しが強い夏の日には常にスプリンクラーの水に当たっていないと干からびて死んでしまいます。公園に設置されたスプリンクラーは、節水のため一度に一つだけ散水することになっているので、ぴょん吉はスプリンクラーの作動に合わせて移動しなくてはなりません。

(a) 公園の地図

(b) ぴょん吉のジャンプ範囲

(c) スプリンクラーの散水範囲

公園は上図の(a)のとおりで、公園内の場所は縦横それぞれ 0~9 の座標で表し、黒い●がスプリンクラーで、その番号が作動する順番を表しています。これは一例で各スプリンクラーの場所と作動順序は日々変わります。

ぴょん吉は不器用なので、移動するにも決まった距離をジャンプすることしかできません。ぴょん吉のジャンプできる範囲は上図(b)のとおりで、それ以外の場所に移動することはできません。しかも、一回のジャンプで相当体力を消耗するため、しばらく水に当たって休まなくてはなりません。

スプリンクラーが散水できる範囲は上図(c)のとおりで、スプリンクラー自身の座標も含みます。各スプリンクラーは一定時間散水すると停止し、すぐに次のスプリンクラーが作動を開始します。ぴょん吉はこの時に一回だけジャンプするものとし、次に散水が停止するまでジャンプしないものとします。また、公園の四方は灼熱のアスファルトで囲まれているので公園の外にでてしまうような方向にはジャンプしないものとします。

猛暑となったこの夏。果たしてぴょん吉は生き延びることができたのでしょうか? ある日のぴょん吉の初期位置、スプリンクラーの位置と作動順序を読み込み、ぴょん吉が生き延びられる移動経路が存在している場合は”OK”、どう頑張っても死んでしまう場合は”NA”を出力するプログラムを作成してください。ただし、スプリンクラーの数は最大 10 個とし、ぴょん吉は一番目のスプリンクラーの作動と同時に初期位置からジャンプすることとします。

Input

複数のデータセットが与えられます。各データセットは以下の形式で与えられます。

px py
n
x1 y1 x2 y2 ... xn yn

1 行目にぴょん吉の初期位置の横座標 px と縦座標 py が与えられます。
2 行目にスプリンクラーの数 n が与えられます。
3 行目に i 番目に動作するスプリンクラーの横座標 xi と縦座標 yi が与えられます。

入力はゼロ２つの行で終わります。データセットの数は 20 を超えません。

Output

各データセットについて、生存の場合は OK、そうでない場合は NA を１行に出力してください。

Sample Input

6 1
10
6 4 3 3 1 2 0 5 4 6 1 8 5 9 7 7 8 6 8 3
6 1
10
6 4 3 3 1 2 0 5 4 6 1 8 5 9 7 7 8 6 9 0
0 0

Output for the Sample Input

OK
NA

Solution in Ruby (judge verdict: Accepted)

class Sprinkler
  def initialize(index, x, y)
    @index = index
    @x = x
    @y = y
  end

  def in_range?(x, y)
    diff_x = (@x - x).abs
    diff_y = (@y - y).abs
    diff_x <= 1 && diff_y <= 1
  end
end

def movable_point(x, y)
  return [[x-1, y+2], [x, y+2], [x+1, y+2],
          [x+2, y+1], [x+2, y], [x+2, y-1],
          [x+1, y-2], [x, y-2], [x-1, y-2],
          [x-2, y-1], [x-2, y], [x-2, y+1]]
end

def calc
  l = gets.chomp
  exit if l == "0 0"

  # initial position
  init = l.split(" ").map {|x| x.to_i}

  # num of sprinkler
  n = gets.chomp.to_i

  # sprinkler position
  pos = gets.split(" ").map {|x| x.to_i}
  sprinklers = Array.new
  n.times do |i|
    sprinkler = Sprinkler.new(i, pos[2*i], pos[2*i+1] )
    sprinklers.push sprinkler
  end

  path = Array.new
  path.push init

  nextPath = Array.new
  # ??????????????????????????°?????°?????????
  for sprinkler in sprinklers do
    # ???????????§?????°??????????????§?¨?
    path.each do |point|
      # ?????¨??°??????????§???????????????§?¨?
      movable_point(point[0], point[1]).each do |movable|
        nextPath.push movable if sprinkler.in_range? movable[0], movable[1]
      end
    end
    if nextPath.length == 0 then
      puts "NA"
      return
    end
    path = nextPath.clone
    nextPath.clear
  end
  puts "OK"
  return
end

# input
while true do
  calc
end