結果

問題 No.424 立体迷路
コンテスト
ユーザー n_knuu
提出日時 2016-09-22 22:54:10
言語 Nim
(2.2.0)
結果
CE  
(最新)
AC  
(最初)
実行時間 -
コード長 1,082 bytes
コンパイル時間 1,595 ms
コンパイル使用メモリ 66,252 KB
最終ジャッジ日時 2024-11-14 19:51:54
合計ジャッジ時間 2,324 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge2
このコードへのチャレンジ
（要ログイン）
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。（リジャッジ後のコンパイルエラーは公開されます）
ただし、clay言語の場合は開発者のデバッグのため、公開されます。

コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 28) Error: cannot open file: queues

ソースコード

diff # 

import strutils, sequtils, queues, algorithm

let
  tmp1 = stdin.readline.split.map(parseInt)
  (h, w) = (tmp1[0], tmp1[1])
  tmp2 = stdin.readline.split.mapIt(it.parseInt-1)
  (sr, sc, gr, gc) = (tmp2[0], tmp2[1], tmp2[2], tmp2[3])
var board = newSeq[string](h)

for i in 0..<h:
  board[i] = stdin.readline

var
  used = newSeqWith(h, newSeqWith(w, false))
  que = initQueue[(int, int)]()

que.enqueue((sr, sc))

let drc = [(-1, 0), (0, 1), (1, 0), (0, -1)]

proc in_board(r, c: int): bool =
  return 0 <= r and r < h and 0 <= c and c < w

while que.len > 0:
  let (r, c) = que.dequeue
  if used[r][c]:
    continue
  used[r][c] = true
  if (r, c) == (gr, gc):
    echo("YES")
    quit(0)
  for d in drc:
    let
      (dr, dc) = d
      (nr, nc) = (r+dr, c+dc)
      (nnr, nnc) = (r+2*dr, c+2*dc)
    if in_board(nr, nc) and not used[nr][nc] and abs(board[nr][nc].int - board[r][c].int) <= 1:
      que.enqueue((nr, nc))
    if in_board(nnr, nnc) and not used[nnr][nnc] and board[nnr][nnc] == board[r][c] and board[r][c] >= board[nr][nc]:
      que.enqueue((nnr, nnc))
echo("NO")
0