結果

問題 No.670 log は定数
ユーザー te-shte-sh
提出日時 2018-04-20 10:30:32
言語 D
(dmd 2.106.1)
結果
AC  
実行時間 2,675 ms / 4,000 ms
コード長 1,027 bytes
コンパイル時間 622 ms
コンパイル使用メモリ 91,968 KB
実行使用メモリ 7,504 KB
最終ジャッジ日時 2023-09-03 20:01:21
合計ジャッジ時間 30,626 ms
ジャッジサーバーID
（参考情報） 		judge15 / judge13
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 2,651 ms
6,988 KB
testcase_01 AC 2,627 ms
6,704 KB
testcase_02 AC 2,616 ms
7,236 KB
testcase_03 AC 2,675 ms
6,972 KB
testcase_04 AC 2,636 ms
6,244 KB
testcase_05 AC 2,653 ms
7,192 KB
testcase_06 AC 2,646 ms
7,468 KB
testcase_07 AC 2,611 ms
7,504 KB
testcase_08 AC 2,604 ms
7,248 KB
testcase_09 AC 2,630 ms
6,716 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

import std.algorithm, std.container, std.conv, std.math, std.range, std.typecons, std.stdio, std.string;

auto rdsp(){return readln.splitter;}
void pick(R,T)(ref R r,ref T t){t=r.front.to!T;r.popFront;}
void pickV(R,T...)(ref R r,ref T t){foreach(ref v;t)pick(r,v);}
void readV(T...)(ref T t){auto r=rdsp;foreach(ref v;t)pick(r,v);}

ulong seed;
int next() {
  seed = seed ^ (seed << 13);
  seed = seed ^ (seed >> 7);
  seed = seed ^ (seed << 17);
  return cast(int)(seed >> 33);
}

const tb = 31, ub = 15, db = tb-ub;

void main()
{
  int n, q; readV(n, q, seed);

  foreach (i; 0..10000) next();

  auto a = new int[](n);
  foreach (i; 0..n) a[i] = next();

  auto b = new int[][](1<<ub), c = new int[](1<<ub);
  foreach (ai; a) {
    b[ai>>db] ~= [ai];
    ++c[ai>>db];
  }
  auto cc = new int[](1<<ub+1);
  foreach (i; 0..1<<ub) cc[i+1] = cc[i]+c[i];

  auto ans = 0uL;
  foreach (ulong i; 0..q) {
    auto x = next(), xi = (x>>db), r = cc[xi];
    foreach (bi; b[xi]) r += bi < x;
    ans ^= i * r;
  }

  writeln(ans);
}
0