結果
問題 |
No.1424 Ultrapalindrome
|
ユーザー |
|
提出日時 | 2021-06-02 21:44:44 |
言語 | Nim (2.2.0) |
結果 |
AC
|
実行時間 | 66 ms / 2,000 ms |
コード長 | 1,505 bytes |
コンパイル時間 | 4,861 ms |
コンパイル使用メモリ | 87,552 KB |
実行使用メモリ | 12,800 KB |
最終ジャッジ日時 | 2024-11-15 17:28:55 |
合計ジャッジ時間 | 6,989 ms |
ジャッジサーバーID (参考情報) |
judge2 / judge5 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 29 |
コンパイルメッセージ
/home/judge/data/code/Main.nim(2, 18) Warning: Use the new 'sugar' module instead; future is deprecated [Deprecated] /home/judge/data/code/Main.nim(1, 8) Warning: imported and not used: 'times' [UnusedImport] /home/judge/data/code/Main.nim(2, 26) Warning: imported and not used: 'strformat' [UnusedImport] /home/judge/data/code/Main.nim(2, 18) Warning: imported and not used: 'future' [UnusedImport] /home/judge/data/code/Main.nim(2, 37) Warning: imported and not used: 'deques' [UnusedImport] /home/judge/data/code/Main.nim(1, 41) Warning: imported and not used: 'algorithm' [UnusedImport] /home/judge/data/code/Main.nim(1, 52) Warning: imported and not used: 'tables' [UnusedImport] /home/judge/data/code/Main.nim(2, 8) Warning: imported and not used: 'critbits' [UnusedImport] /home/judge/data/code/Main.nim(1, 66) Warning: imported and not used: 'lists' [UnusedImport] /home/judge/data/code/Main.nim(1, 73) Warning: imported and not used: 'intsets' [UnusedImport]
ソースコード
import times, strutils, sequtils, math, algorithm, tables, sets, lists, intsets import critbits, future, strformat, deques template `max=`(x,y) = x = max(x,y) template `min=`(x,y) = x = min(x,y) template `mod=`(x,y) = x = x mod y template scan2 = (scan(), scan()) template scan3 = (scan(), scan()) let read* = iterator: string {.closure.} = while true: (for s in stdin.readLine.split: yield s) proc scan(): int = read().parseInt proc scanf(): float = read().parseFloat proc toInt(c:char): int = return int(c) - int('0') proc solve()= var n = scan() es = newseqwith(n,newseq[int]()) mv = -1 for i in 0..<n-1: var a = scan()-1 b = scan()-1 es[a].add(b) es[b].add(a) # 枝分かれがある if es[a].len>2: mv = a if es[b].len>2: mv = b #echo es.join("\n") proc dfs(par,p:int):int= if es[p].len==1: return 1 else: for nxt in es[p]: if par == nxt:continue return 1+dfs(p,nxt) # 葉が2枚しかない場合は可能 if es.filterIt(it.len==1).len==2: echo "Yes" # 枝分かれしている頂点が一つしかない # 一つしかないならmvがそれに該当する elif es.filterIt(it.len>2).len==1: #echo "mv:", mv var t = initHashSet[int]() for nxt in es[mv]: #echo mv,",",nxt,",", dfs(mv,nxt) t.incl(dfs(mv,nxt)) if t.len==1: echo "Yes" else: echo "No" elif n == 1: echo "Yes" else: echo "No" solve()