結果

問題 No.34 砂漠の行商人
コンテスト
ユーザー 6soukiti29
提出日時 2017-07-27 16:58:27
言語 Nim
(2.2.8)
コンパイル:
nim --nimcache=~ --hints:off -o:a.out -d:release cpp _filename_
実行:
./a.out
結果
CE  
(最新)
AC  
(最初)
実行時間 -
コード長 1,079 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 580 ms
コンパイル使用メモリ 68,004 KB
最終ジャッジ日時 2026-03-19 18:39:52
合計ジャッジ時間 1,162 ms
ジャッジサーバーID
（参考情報） 		judge2_0 / judge3_0
このコードへのチャレンジ
（要ログイン）
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。（リジャッジ後のコンパイルエラーは公開されます）
ただし、clay言語の場合は開発者のデバッグのため、公開されます。

コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 33) Warning: Use the new 'sugar' module instead; future is deprecated [Deprecated]
/home/judge/data/code/Main.nim(8, 45) Error: tuple expected for tuple unpacking, but got 'seq[int]'

ソースコード

diff #
raw source code 

import sequtils,strutils,deques,future
type
    zahyou = tuple[x,y : int]
    item = tuple[id : zahyou,h : int,cnt : int]
var
    N,V,Sx,Sy,Gx,Gy : int
    D = [[1,0],[0,1],[-1,0],[0,-1]]
(N,V,Sx,Sy,Gx,Gy) = stdin.readline.split.map(parseInt)
var
    sabaku = newSeqWith(N + 2,newSeqWith(N + 2,100000))
    S = newSeqWith(N + 2,newSeqWith(N + 2,V))
    dq = initDeque[item](1024)
    p : zahyou
    t : item
    t2 : item
    flag : bool

for n in 1..N:
    sabaku[n][1..N] = stdin.readline.split.map(parseInt)
S[Sy][Sx] = 0
p = (Sx,Sy)
t = (p,0,0)
dq.addLast(t)
while dq.len > 0 and flag == false:
    t = dq.popFirst
    p = t.id
    if S[p.y][p.x] < t.h:
        continue
    for d in D:
        var
            ny = p.y + d[0]
            nx = p.x + d[1]
        if S[ny][nx] > t.h + sabaku[ny][nx]:
            if (nx,ny) == (Gx,Gy):
                echo t.cnt + 1
                flag = true
                break
            S[ny][nx] = t.h + sabaku[ny][nx]
            t2 = ((nx,ny),t.h + sabaku[ny][nx],t.cnt + 1)
            dq.addLast(t2)
if flag == false:
    echo -1
0