結果

問題 No.1 道のショートカット
ユーザー 👑 obakyanobakyan
提出日時 2022-03-07 09:14:12
言語 Lua
(LuaJit 2.1.1696795921)
結果
AC  
実行時間 16 ms / 5,000 ms
コード長 1,738 bytes
コンパイル時間 174 ms
コンパイル使用メモリ 6,940 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-07-22 01:16:04
合計ジャッジ時間 1,729 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge4
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 1 ms
6,812 KB
testcase_01 AC 2 ms
6,944 KB
testcase_02 AC 1 ms
6,940 KB
testcase_03 AC 1 ms
6,940 KB
testcase_04 AC 2 ms
6,940 KB
testcase_05 AC 1 ms
6,944 KB
testcase_06 AC 1 ms
6,940 KB
testcase_07 AC 2 ms
6,940 KB
testcase_08 AC 6 ms
6,944 KB
testcase_09 AC 3 ms
6,940 KB
testcase_10 AC 6 ms
6,940 KB
testcase_11 AC 8 ms
6,944 KB
testcase_12 AC 16 ms
6,940 KB
testcase_13 AC 15 ms
6,944 KB
testcase_14 AC 3 ms
6,944 KB
testcase_15 AC 1 ms
6,944 KB
testcase_16 AC 3 ms
6,940 KB
testcase_17 AC 2 ms
6,944 KB
testcase_18 AC 2 ms
6,940 KB
testcase_19 AC 2 ms
6,944 KB
testcase_20 AC 4 ms
6,940 KB
testcase_21 AC 3 ms
6,940 KB
testcase_22 AC 3 ms
6,944 KB
testcase_23 AC 10 ms
6,940 KB
testcase_24 AC 9 ms
6,944 KB
testcase_25 AC 4 ms
6,940 KB
testcase_26 AC 3 ms
6,940 KB
testcase_27 AC 11 ms
6,944 KB
testcase_28 AC 2 ms
6,944 KB
testcase_29 AC 6 ms
6,940 KB
testcase_30 AC 3 ms
6,940 KB
testcase_31 AC 3 ms
6,940 KB
testcase_32 AC 8 ms
6,940 KB
testcase_33 AC 4 ms
6,940 KB
testcase_34 AC 9 ms
6,944 KB
testcase_35 AC 2 ms
6,944 KB
testcase_36 AC 5 ms
6,944 KB
testcase_37 AC 3 ms
6,940 KB
testcase_38 AC 2 ms
6,944 KB
testcase_39 AC 3 ms
6,944 KB
testcase_40 AC 3 ms
6,940 KB
testcase_41 AC 2 ms
6,940 KB
testcase_42 AC 1 ms
6,940 KB
testcase_43 AC 2 ms
6,940 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

local n, c, v = io.read("*n", "*n", "*n")
local s, t, y = {}, {}, {}
local edge = {}
for i = 1, n do edge[i] = {} end
for i = 1, v do s[i] = io.read("*n") end
for i = 1, v do t[i] = io.read("*n") end
for i = 1, v do y[i] = io.read("*n") end
for i = 1, v do
  local m = io.read("*n")
  if not edge[s[i]][t[i]] then
    edge[s[i]][t[i]] = {}
  end
  table.insert(edge[s[i]][t[i]], {y[i], m})
end

local len = {}
local taskstate = {}
local inf = 1000000000
for i = 1, n * c do
  len[i] = inf
  taskstate[i] = false
end
local mfl, mmi = math.floor, math.min
local tasks = {}
local tasknum = 0
local done = 0
for dst, y_ms in pairs(edge[1]) do
  for _u, y_m in pairs(y_ms) do
    local idx = (y_m[1] - 1) * n + dst
    if idx <= n * c then
      len[idx] = mmi(len[idx], y_m[2])
      if dst < n then
        if not taskstate[idx] then
          table.insert(tasks, idx)
          tasknum = tasknum + 1
          taskstate[idx] = true
        end
      end
    end
  end
end
while done < tasknum do
  done = done + 1
  local idx = tasks[done]
  taskstate[idx] = false
  -- src ~= n
  local src = idx % n
  local yen = 1 + mfl((idx - src) / n)
  for dst, y_ms in pairs(edge[src]) do
    for _u, y_m in pairs(y_ms) do
      local dst_idx = (yen + y_m[1] - 1) * n + dst
      if dst_idx <= n * c then
        if len[idx] + y_m[2] < len[dst_idx] then
          len[dst_idx] = len[idx] + y_m[2]
          if dst < n and not taskstate[dst_idx] then
            table.insert(tasks, dst_idx)
            tasknum = tasknum + 1
            taskstate[dst_idx] = true
          end
        end
      end
    end
  end
end
local minval = inf
for i = 1, c do
  minval = mmi(minval, len[i * n])
end
if minval == inf then
  print(-1)
else
  print(minval)
end
0