結果

問題 No.556 仁義なきサルたち
ユーザー 👑 obakyan
提出日時 2019-05-04 18:27:26
言語 Lua
(LuaJit 2.1.1734355927)
結果
AC  
実行時間 11 ms / 2,000 ms
コード長 703 bytes
コンパイル時間 68 ms
コンパイル使用メモリ 6,816 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-06-23 04:26:54
合計ジャッジ時間 912 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 22
権限があれば一括ダウンロードができます

ソースコード

diff # 

local ior = io.input()
local n, m = ior:read("*n", "*n")
local parent, gnum = {}, {}
for i = 1, n do parent[i], gnum[i] = i, 1 end

local function findroot(idx)
  while(parent[idx] ~= idx) do
    idx = parent[idx]
  end
  return idx
end

for i = 1, m do
  local a, b = ior:read("*n", "*n")
  local ar, br = findroot(a), findroot(b)
  parent[a], parent[b] = ar, br
  if(ar ~= br) then
    local an, bn = gnum[ar], gnum[br]
    local dst = true
    if(an < bn or (an == bn and br < ar)) then
      gnum[ar], gnum[br] = 0, gnum[ar] + gnum[br]
      parent[ar] = br
    else
      gnum[ar], gnum[br] = gnum[ar] + gnum[br], 0
      parent[br] = ar
    end
  end
end

for i = 1, n do
  print(findroot(i))
end
0