結果
問題 | No.2289 順列ソート |
ユーザー |
👑 |
提出日時 | 2023-05-05 23:40:15 |
言語 | Lua (LuaJit 2.1.1734355927) |
結果 |
WA
|
実行時間 | - |
コード長 | 921 bytes |
コンパイル時間 | 58 ms |
コンパイル使用メモリ | 5,248 KB |
実行使用メモリ | 5,248 KB |
最終ジャッジ日時 | 2024-11-23 12:45:19 |
合計ジャッジ時間 | 862 ms |
ジャッジサーバーID (参考情報) |
judge5 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 2 WA * 1 |
other | AC * 1 WA * 20 |
ソースコード
local UF = {} UF.create = function(self, n) self.parent = {} for i = 1, n do self.parent[i] = i end end UF.getroot = function(self, idx) local parent = self.parent local idx_update = idx while parent[idx] ~= idx do idx = parent[idx] end while parent[idx_update] ~= idx do parent[idx_update], idx_update = idx, parent[idx_update] end return idx end UF.unite = function(self, a, b) local ra = self:getroot(a) local rb = self:getroot(b) self.parent[b], self.parent[rb] = ra, ra end UF.new = function(n) local obj = {} setmetatable(obj, {__index = UF}) obj:create(n) return obj end local n = io.read("*n") local uf = UF.new(n) for i = 1, n do local a = io.read("*n") uf:unite(i, a) end local g = {} for i = 1, n do local r = uf:getroot(i) if not g[r] then g[r] = 0 end g[r] = g[r] + 1 end local ans = 0 for key, val in pairs(g) do ans = ans + key - 1 end print(ans)