結果

問題 No.803 Very Limited Xor Subset
ユーザー ikd
提出日時 2019-03-18 15:19:38
言語 Nim
(2.2.0)
結果
AC  
実行時間 7 ms / 2,000 ms
コード長 1,253 bytes
コンパイル時間 3,477 ms
コンパイル使用メモリ 66,020 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-07-01 22:40:18
合計ジャッジ時間 5,202 ms
ジャッジサーバーID
(参考情報)
judge4 / judge3
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 4
other AC * 43
権限があれば一括ダウンロードができます

ソースコード

diff #
プレゼンテーションモードにする

import strutils, sequtils
proc gauss(a: var seq[seq[int]]): int =
let (n, m) = (a.len, a[0].len)
var rk = 0
for j in 0..<(m - 1):
var pv = -1
for i in rk..<n:
if a[i][j] == 1:
pv = i
break
if pv >= 0:
swap(a[rk], a[pv])
for i in (rk + 1)..<n:
if a[i][j] == 1:
for j2 in j..<m:
a[i][j2] = a[i][j2] xor a[rk][j2]
rk += 1
for i in rk..<n:
if a[i][m - 1] > 0:
rk = -1
break
return rk
proc main() =
let
nmx = stdin.readLine.strip.split.map(parseInt)
(n, m, x) = (nmx[0], nmx[1], nmx[2])
a = stdin.readLine.strip.split.map(parseInt)
lrs = (0..<m).mapIt(stdin.readLine.strip.split.map(parseInt))
b = 33
var mat = newSeqWith(b + m, newSeq[int](n + 1))
for i in 0..<b:
for j in 0..<n:
if ((a[j] shr i) and 1) == 1:
mat[i][j] = 1
for i in 0..<b:
if ((x shr i) and 1) == 1:
mat[i][n] = 1
for i in 0..<m:
for j in (lrs[i][1] - 1)..(lrs[i][2] - 1):
mat[b + i][j] = 1
mat[b + i][n] = lrs[i][0]
let rk = gauss(mat)
if rk < 0:
echo 0
else:
var
ans: int64 = 1
mo: int64 = 1000000000 + 7
for _ in 0..<(n - rk):
ans = ans * 2 mod mo
echo ans
main()
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
0