結果

問題 No.429 CupShuffle
ユーザー 👑 obakyanobakyan
提出日時 2019-05-01 22:04:37
言語 Lua
(LuaJit 2.1.1696795921)
結果
AC  
実行時間 71 ms / 2,000 ms
コード長 670 bytes
コンパイル時間 252 ms
コンパイル使用メモリ 5,368 KB
実行使用メモリ 6,476 KB
最終ジャッジ日時 2023-08-30 04:28:32
合計ジャッジ時間 1,429 ms
ジャッジサーバーID
（参考情報） 		judge12 / judge13
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 1 ms
4,380 KB
testcase_01 AC 1 ms
4,376 KB
testcase_02 AC 1 ms
4,376 KB
testcase_03 AC 1 ms
4,380 KB
testcase_04 AC 1 ms
4,376 KB
testcase_05 AC 1 ms
4,376 KB
testcase_06 AC 2 ms
4,380 KB
testcase_07 AC 2 ms
4,380 KB
testcase_08 AC 1 ms
4,376 KB
testcase_09 AC 2 ms
4,376 KB
testcase_10 AC 8 ms
4,376 KB
testcase_11 AC 67 ms
6,476 KB
testcase_12 AC 65 ms
5,444 KB
testcase_13 AC 66 ms
6,460 KB
testcase_14 AC 71 ms
4,384 KB
testcase_15 AC 1 ms
4,380 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