結果

問題 No.142 単なる配列の操作に関する実装問題
ユーザー te-shte-sh
提出日時 2017-04-26 17:07:25
言語 D
(dmd 2.106.1)
結果
WA  
実行時間 -
コード長 1,666 bytes
コンパイル時間 662 ms
コンパイル使用メモリ 88,944 KB
実行使用メモリ 44,220 KB
最終ジャッジ日時 2023-09-03 13:01:23
合計ジャッジ時間 12,788 ms
ジャッジサーバーID
（参考情報） 		judge13 / judge12
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 WA -
testcase_01 WA -
testcase_02 WA -
testcase_03 WA -
testcase_04 WA -
権限があれば一括ダウンロードができます

ソースコード

diff # 

import std.algorithm, std.conv, std.range, std.stdio, std.string;

const sz = ulong.sizeof * 8;

void main()
{
  auto rd = readln.split;
  auto n = rd[0].to!size_t, seed = rd[1].to!long, x = rd[2].to!long, y = rd[3].to!long, z = rd[4].to!long;

  auto bsz = (n + sz - 1) / sz;

  auto ai = new long[](bsz * sz);
  ai[0] = seed;
  foreach (i; 1..n)
    ai[i] = (ai[i-1] * x + y) % z;

  auto bi = new ulong[](bsz + 1);

  foreach (i; 0..bsz) {
    auto r = ulong(0);
    auto ci = ai[i*sz..(i+1)*sz];
    foreach_reverse (c; ci) {
      r <<= 1;
      r |= c % 2;
    }
    bi[i] = r;
  }

  auto q = readln.chomp.to!size_t;
  foreach (_; 0..q) {
    auto rd2 = readln.split.to!(size_t[]).map!"a - 1";
    auto s = rd2[0], t = rd2[1], u = rd2[2], v = rd2[3];

    auto sd = s / sz, sm = s % sz, td = t / sz, tm = t % sz;
    auto ud = u / sz, um = u % sz, vd = v / sz, vm = v % sz;

    auto ci = new ulong[](td - sd + 2);
    foreach (i; sd..td+1) {
      auto b = bi[i];
      if (i == sd) b &= ~((ulong(1) << sm) - 1);
      if (i == td) b &= (ulong(1) << (tm + 1)) - 1;
      ci[i - sd] = b;
    }

    if (sm < um) {
      foreach_reverse(i, c; ci) {
        ci[i] = (ci[i] << (um - sm));
        if (i > 0)
          ci[i] |= (ci[i - 1] >> (sz - (um - sm)));
      }
    } else {
      foreach (i, c; ci) {
        ci[i] = ci[i] >> (sm - um);
        if (i < ci.length - 1)
          ci[i] |= (ci[i + 1] << (sz - (sm - um)));
      }
    }

    foreach (i; ud..vd+1)
      bi[i] ^= ci[i - ud];
  }

  foreach (i, b; bi)
    foreach (j; 0..sz) {
      if (i * sz + j >= n) break;
      write(predSwitch(b & 1, 0, 'E', 1, 'O'));
      b >>= 1;
    }
  writeln;
}
0