結果
問題 | No.2418 情報通だよ!Nafmoくん |
ユーザー |
![]() |
提出日時 | 2024-11-04 08:16:58 |
言語 | Nim (2.2.0) |
結果 |
AC
|
実行時間 | 65 ms / 2,000 ms |
コード長 | 843 bytes |
コンパイル時間 | 5,198 ms |
コンパイル使用メモリ | 66,020 KB |
実行使用メモリ | 13,824 KB |
最終ジャッジ日時 | 2024-11-14 12:26:21 |
合計ジャッジ時間 | 6,997 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge2 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 21 |
ソースコード
import sequtils, strutilsproc root(x: int, p: var seq[int]): int =if p[x] == -1:xelse:p[x] = root(p[x], p)return p[x]proc unite(x, y: int; p, rank, size: var seq[int]) =varrx = root(x, p)ry = root(y, p)if rank[rx] < rank[ry]:swap(rx, ry)p[ry] = rxif rank[rx] == rank[ry]:inc rank[rx]size[rx].inc size[ry]letnm = stdin.readLine.split.map parseIntn = nm[0]m = nm[1]ab = m.newSeqWith stdin.readLine.split.map parseIntvarp = (-1).repeat n * 2rank, size = 1.repeat n * 2for v in ab:vara = pred v[0]b = pred v[1]ra = root(a, p)rb = root(b, p)if ra != rb:unite(a, b, p, rank, size)var list: seq[int]for i, v in p:if v == -1:list.add ivar cnt = 0for idx in list:if size[idx] mod 2 == 1:inc cntecho:cnt div 2