結果

問題 No.2910 単体ホモロジー入門
ユーザー hiro1729
提出日時 2024-10-04 21:58:16
言語 Nim
(2.2.0)
結果
AC  
実行時間 2 ms / 2,000 ms
コード長 1,993 bytes
コンパイル時間 4,375 ms
コンパイル使用メモリ 67,756 KB
実行使用メモリ 6,820 KB
最終ジャッジ日時 2024-10-04 21:58:22
合計ジャッジ時間 5,074 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 47
権限があれば一括ダウンロードができます
コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 28) Warning: imported and not used: 'math' [UnusedImport]

ソースコード

diff # 

import sequtils, strutils, math, algorithm

when not declared ATCODER_READER_HPP:
  const ATCODER_READER_HPP* = 1
  import streams, strutils, sequtils
#  proc scanf*(formatstr: cstring){.header: "<stdio.h>", varargs.}
  #proc getchar(): char {.header: "<stdio.h>", varargs.}
#  proc nextInt*(): int = scanf("%lld",addr result)
#  proc nextFloat*(): float = scanf("%lf",addr result)
  proc nextString*(f:auto = stdin): string =
    var get = false
    result = ""
    while true:
      let c = f.readChar
      #doassert c.int != 0
      if c.int > ' '.int:
        get = true
        result.add(c)
      elif get: return
  proc nextInt*(f:auto = stdin): int = parseInt(f.nextString)
  proc nextFloat*(f:auto = stdin): float = parseFloat(f.nextString)
#  proc nextString*():string = stdin.nextString()

  proc toStr*[T](v:T):string =
    proc `$`[T](v:seq[T]):string =
      v.mapIt($it).join(" ")
    return $v
  
  proc print0*(x: varargs[string, toStr]; sep:string):string{.discardable.} =
    result = ""
    for i,v in x:
      if i != 0: addSep(result, sep = sep)
      add(result, v)
    result.add("\n")
    stdout.write result
  
  var print*:proc(x: varargs[string, toStr])
  print = proc(x: varargs[string, toStr]) =
    discard print0(@x, sep = " ")

let N = nextInt()
let M = nextInt()
var g = newSeqWith(N, newSeq[int](N))
for i in 0 ..< M:
  let i = nextInt()
  let j = nextInt()
  g[i][j] = 1
  g[j][i] = 1
var s = 0
for i in 0 ..< 3:
  s = s or (1 shl nextInt())
for i in 1 ..< (1 shl N):
  if i != s:
    var p = newSeq[int]()
    for j in 0 ..< N:
      if (i and (1 shl j)) > 0:
        p.add(j)
    if len(p) <= 2:
      continue
    var q = (0 ..< len(p)).toSeq
    var qnx = newSeq[seq[int]]()
    while true:
      qnx.add(q)
      if q.nextPermutation() == false: break
    for q in qnx:
      var ok = true
      for j in 0 ..< len(p):
        if g[p[q[j]]][p[q[(j + 1) mod len(p)]]] == 0:
          ok = false
      if ok:
        echo "Yes"
        quit(0)
echo "No"
0