結果
問題 | No.20 砂漠のオアシス |
ユーザー | むらため |
提出日時 | 2019-02-05 10:09:25 |
言語 | Nim (2.0.0) |
結果 |
CE
(最新)
AC
(最初)
|
実行時間 | - |
コード長 | 638 bytes |
コンパイル時間 | 870 ms |
コンパイル使用メモリ | 56,776 KB |
最終ジャッジ日時 | 2023-09-14 03:30:57 |
合計ジャッジ時間 | 1,295 ms |
ジャッジサーバーID (参考情報) |
judge15 / judge12 |
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。(リジャッジ後のコンパイルエラーは公開されます)
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
コンパイルメッセージ
/home/judge/data/code/Main.nim(2, 10) Warning: Deprecated since v1.5; Use auto instead.; any is deprecated [Deprecated] /home/judge/data/code/Main.nim(8, 42) Error: undeclared identifier: 'newHeapQueue' candidates (edit distance, scope distance); see '--spellSuggest': (3, 2): 'heapqueue' [module declared in /home/judge/data/code/Main.nim(1, 26)] (3, 4): 'initHeapQueue' [proc declared in /nim-1.6.12/lib/pure/collections/heapqueue.nim(54, 6)] (3, 4): 'toHeapQueue' [proc declared in /nim-1.6.12/lib/pure/collections/heapqueue.nim(139, 6)]
ソースコード
import sequtils,strutils,heapqueue proc r():any=stdin.readLine.split.map parseInt let t=r() (n,v,ox,oy)=(t[0],t[1],t[3]-1,t[2]-1) L=newSeqWith(n,r()) proc T(sx,sy,sv,c:int)= var(C,O)=(newSeqWith(n,newSeqWith(n,0)),newHeapQueue[(int,int,int)]()) O.push (-sv,sx,sy) while O.len>0: let(v,x,y)=O.pop() if C[x][y]==1:continue C[x][y]=1 if c==1 and x==ox and y==oy:(T(x,y,-v*2,0);continue) for d in[(x,y+1),(x+1,y),(x,y-1),(x-1,y)]: if d[0]<0 or d[1]<0 or d[0]>=n or d[1]>=n or-v-L[d[0]][d[1]]<=0 or C[d[0]][d[1]]==1:continue O.push (v+L[d[0]][d[1]],d[0],d[1]) if d[0]==n-1 and d[1]==n-1:quit "YES",0 T 0,0,v,1 echo"NO"