結果

問題 No.429 CupShuffle
ユーザー 👑 obakyanobakyan
提出日時 2019-05-01 22:04:37
言語 Lua
(LuaJit 2.1.1734355927)
結果
AC  
実行時間 74 ms / 2,000 ms
コード長 670 bytes
コンパイル時間 422 ms
コンパイル使用メモリ 7,072 KB
実行使用メモリ 7,040 KB
最終ジャッジ日時 2024-12-31 12:41:51
合計ジャッジ時間 1,260 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge2
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 2 ms
6,816 KB
testcase_01 AC 1 ms
6,820 KB
testcase_02 AC 1 ms
6,816 KB
testcase_03 AC 1 ms
6,820 KB
testcase_04 AC 2 ms
6,816 KB
testcase_05 AC 2 ms
6,816 KB
testcase_06 AC 2 ms
6,816 KB
testcase_07 AC 2 ms
6,820 KB
testcase_08 AC 1 ms
6,816 KB
testcase_09 AC 2 ms
6,820 KB
testcase_10 AC 9 ms
6,816 KB
testcase_11 AC 69 ms
7,040 KB
testcase_12 AC 67 ms
6,820 KB
testcase_13 AC 68 ms
6,912 KB
testcase_14 AC 74 ms
6,816 KB
testcase_15 AC 1 ms
6,816 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

local ior = io.input()
local n, k, x = ior:read("*n", "*n", "*n", "*l")
local cur = {}
local last = {}
for i = 1, n do cur[i] = i end
for i = 1, x - 1 do
  local a, b = ior:read("*n", "*n", "*l")
  cur[a], cur[b] = cur[b], cur[a]
end
ior:read() -- unused
local at = {}
local bt = {}
for i = x + 1, k do
  at[i - x], bt[i - x] = io.read("*n", "*n")
end
for i = 1, n do last[i] = ior:read("*n") end
for i = k, x + 1, -1 do
  local q, r = last[at[i - x]], last[bt[i - x]]
  last[at[i - x]], last[bt[i - x]] = r, q
end
local fst = true
for i = 1, n do
  if(cur[i] ~= last[i]) then
    io.write(i)
    if(fst) then fst = false io.write(" ") else io.write("\n") end
  end
end
0