結果

問題 No.1109 調の判定
コンテスト
ユーザー Haar
提出日時 2020-07-10 21:33:04
言語 Nim
(2.2.0)
結果
WA  
実行時間 -
コード長 1,272 bytes
コンパイル時間 4,283 ms
コンパイル使用メモリ 66,652 KB
実行使用メモリ 6,824 KB
最終ジャッジ日時 2024-10-11 08:01:34
合計ジャッジ時間 5,522 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample WA * 3
other WA * 43
権限があれば一括ダウンロードができます
コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 49) Warning: imported and not used: 'math' [UnusedImport]
/home/judge/data/code/Main.nim(1, 17) Warning: imported and not used: 'strutils' [UnusedImport]
/home/judge/data/code/Main.nim(1, 26) Warning: imported and not used: 'sugar' [UnusedImport]
/home/judge/data/code/Main.nim(1, 32) Warning: imported and not used: 'algorithm' [UnusedImport]
/home/judge/data/code/Main.nim(1, 42) Warning: imported and not used: 'bitops' [UnusedImport]

ソースコード

diff # 

import sequtils,strutils,sugar,algorithm,bitops,math

proc scanf*(formatstr: cstring){.header: "<stdio.h>", importc: "scanf", varargs.}
proc nextInt*(): int32 = scanf("%d", addr result)
proc nextLong*(): int64 = scanf("%lld", addr result)
proc nextFloat*(): float64 = scanf("%lf", addr result)
proc getchar*(): char {.header: "<stdio.h>", importc: "getchar".}
proc nextChar*(): char =
  while true:
    let c = getchar()
    if c.ord >= 0x21 and c.ord <= 0x7e:
      result = c
      break

proc nextstr*(): string =
  var ok = false
  while true:
    let c = getchar()
    if c.ord >= 0x21 and c.ord <= 0x7e: ok = true
    elif ok: break

    if ok:
      result.add(c)
      


template `max=`*(x, y) = x = max(x, y)
template `min=`*(x, y) = x = min(x, y)
template times*(n: int; body: untyped): untyped = (for _ in 0 ..< n: body)
proc `<-`*[T, U](a: var T, b: U): T =
  a = b
  return a

template `<<`(a: untyped, b: int): untyped = (a shl b)
template `>>`(a: untyped, b: int): untyped = (a shr b)



let N = nextint()
let T = newSeqWith(N, nextint())


var ans: seq[int] = @[]


for D in 0 ..< 12:
  let a = @[0, 2, 4, 5, 7, 9, 11].mapIt((it + D) mod 12)
  
  if T.allIt(it mod 12 in a):
    ans.add(D)


debugecho ans


if ans.len == 1:
  echo ans[0]
else:
  echo -1
0