結果

問題 No.20 砂漠のオアシス
ユーザー letrangerjp
提出日時 2017-06-03 20:26:29
言語 Ruby
(3.4.1)
結果
RE  
(最新)
AC  
(最初)
実行時間 -
コード長 355 bytes
コンパイル時間 454 ms
コンパイル使用メモリ 7,552 KB
実行使用メモリ 19,584 KB
最終ジャッジ日時 2024-10-13 05:57:40
合計ジャッジ時間 4,576 ms
ジャッジサーバーID
(参考情報)
judge4 / judge3
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
other AC * 20 RE * 1
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

eval"N,V,X,Y="+gets.split*?,
L=$<.map{|s|s.split.map(&:to_i)<<1e3}+[[1e3]*N]
$*<<[V,0,0,1]
d={[0,0,1]=>V}
while(h,x,y,o=$*.pop)
[x,y]==[N-1,N-1]&&($><<:YES;exit)
[x,y,o]==[X-1,Y-1,1]&&(h*=2;o=0)
[[x+1,y],[x,y+1],[x-1,y],[x,y-1]].map{|a,b|(0<i=h-L[b][a])&&!d[[a,b,o]]&&(d[[a,b,o]]=i;e=[i,a,b,o];$*[$*.bsearch_index{|v|0.<v<=>e}||$*.size,0]=[e])}end
$><<:NO
0