#291180 (D) No.738 平らな農地

提出ソース

結果

問題	No.738 平らな農地
ユーザー	te-sh
提出日時	2018-10-10 15:57:33
言語	D (dmd 2.106.1)
結果	AC
実行時間	179 ms / 2,000 ms
コード長	2,042 bytes
コンパイル時間	1,018 ms
コンパイル使用メモリ	115,456 KB
実行使用メモリ	10,408 KB
最終ジャッジ日時	2024-06-13 01:52:28
合計ジャッジ時間	8,297 ms
ジャッジサーバーID （参考情報）	judge4 / judge5

このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示

入力	結果	実行時間実行使用メモリ
testcase_00	AC	1 ms 5,248 KB
testcase_01	AC	1 ms 5,376 KB
testcase_02	AC	1 ms 5,376 KB
testcase_03	AC	1 ms 5,376 KB
testcase_04	AC	1 ms 5,376 KB
testcase_05	AC	3 ms 5,376 KB
testcase_06	AC	4 ms 5,376 KB
testcase_07	AC	4 ms 5,376 KB
testcase_08	AC	2 ms 5,376 KB
testcase_09	AC	2 ms 5,376 KB
testcase_10	AC	1 ms 5,376 KB
testcase_11	AC	2 ms 5,376 KB
testcase_12	AC	1 ms 5,376 KB
testcase_13	AC	3 ms 5,376 KB
testcase_14	AC	2 ms 5,376 KB
testcase_15	AC	76 ms 8,292 KB
testcase_16	AC	96 ms 8,432 KB
testcase_17	AC	110 ms 8,424 KB
testcase_18	AC	84 ms 8,408 KB
testcase_19	AC	135 ms 8,608 KB
testcase_20	AC	78 ms 8,564 KB
testcase_21	AC	93 ms 8,744 KB
testcase_22	AC	78 ms 8,436 KB
testcase_23	AC	122 ms 8,456 KB
testcase_24	AC	98 ms 8,568 KB
testcase_25	AC	2 ms 5,376 KB
testcase_26	AC	2 ms 5,376 KB
testcase_27	AC	2 ms 5,376 KB
testcase_28	AC	1 ms 5,376 KB
testcase_29	AC	2 ms 5,376 KB
testcase_30	AC	2 ms 5,376 KB
testcase_31	AC	2 ms 5,376 KB
testcase_32	AC	2 ms 5,376 KB
testcase_33	AC	2 ms 5,376 KB
testcase_34	AC	2 ms 5,376 KB
testcase_35	AC	1 ms 5,376 KB
testcase_36	AC	1 ms 5,376 KB
testcase_37	AC	2 ms 5,376 KB
testcase_38	AC	2 ms 5,376 KB
testcase_39	AC	2 ms 5,376 KB
testcase_40	AC	2 ms 5,376 KB
testcase_41	AC	2 ms 5,376 KB
testcase_42	AC	2 ms 5,376 KB
testcase_43	AC	2 ms 5,376 KB
testcase_44	AC	2 ms 5,376 KB
testcase_45	AC	84 ms 9,060 KB
testcase_46	AC	95 ms 8,684 KB
testcase_47	AC	80 ms 9,152 KB
testcase_48	AC	81 ms 8,608 KB
testcase_49	AC	87 ms 8,604 KB
testcase_50	AC	85 ms 9,020 KB
testcase_51	AC	83 ms 9,036 KB
testcase_52	AC	75 ms 8,596 KB
testcase_53	AC	75 ms 8,876 KB
testcase_54	AC	86 ms 9,084 KB
testcase_55	AC	83 ms 9,164 KB
testcase_56	AC	94 ms 9,020 KB
testcase_57	AC	91 ms 8,580 KB
testcase_58	AC	79 ms 8,884 KB
testcase_59	AC	91 ms 9,192 KB
testcase_60	AC	91 ms 9,180 KB
testcase_61	AC	94 ms 9,048 KB
testcase_62	AC	71 ms 8,588 KB
testcase_63	AC	86 ms 9,320 KB
testcase_64	AC	83 ms 9,044 KB
testcase_65	AC	102 ms 8,428 KB
testcase_66	AC	111 ms 8,472 KB
testcase_67	AC	67 ms 9,924 KB
testcase_68	AC	83 ms 10,096 KB
testcase_69	AC	117 ms 10,264 KB
testcase_70	AC	97 ms 10,316 KB
testcase_71	AC	19 ms 5,376 KB
testcase_72	AC	28 ms 5,376 KB
testcase_73	AC	26 ms 5,376 KB
testcase_74	AC	29 ms 5,376 KB
testcase_75	AC	128 ms 10,040 KB
testcase_76	AC	108 ms 10,084 KB
testcase_77	AC	138 ms 9,904 KB
testcase_78	AC	111 ms 10,400 KB
testcase_79	AC	104 ms 10,408 KB
testcase_80	AC	90 ms 10,092 KB
testcase_81	AC	95 ms 10,052 KB
testcase_82	AC	140 ms 10,368 KB
testcase_83	AC	24 ms 5,376 KB
testcase_84	AC	23 ms 5,376 KB
testcase_85	AC	179 ms 10,088 KB
testcase_86	AC	115 ms 9,736 KB
testcase_87	AC	59 ms 10,044 KB
testcase_88	AC	59 ms 9,744 KB
testcase_89	AC	1 ms 5,376 KB
testcase_90	AC	1 ms 5,376 KB
testcase_91	AC	1 ms 5,376 KB

権限があれば一括ダウンロードができます

ソースコード

raw source code

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 readV(T...)(ref T t){auto r=rdsp;foreach(ref v;t)pick(r,v);}
void readA(T)(size_t n,ref T[]t){t=new T[](n);auto r=rdsp;foreach(ref v;t)pick(r,v);}

void main()
{
  int n, k; readV(n, k);
  int[] a; readA(n, a);

  int[int] z;
  auto zn = 0, b = a.dup.sort().uniq.array;
  foreach (bi; b) z[bi] = zn++;
  auto c = a.map!(ai => z[ai]).array;

  auto fc = new FenwickTree!int(zn), fs = new FenwickTree!long(zn);
  foreach (i; 0..k) {
    fc[c[i]] += 1;
    fs[c[i]] += b[c[i]];
  }

  auto ans = 10L^^18;
  foreach (i; 0..n-k+1) {
    auto s = iota(0, zn).map!(j => fc[0..j]).assumeSorted;
    if (k%2 == 0) {
      auto j1 = s.lowerBound(k/2).length-1, j2 = s.lowerBound(k/2+1).length-1;
      ans = min(ans, (fs[j2..$]-b[j2].to!long*(fc[j2..$]-k/2))-(fs[0..j1+1]-b[j1].to!long*(fc[0..j1+1]-k/2)));
    } else {
      auto j = s.lowerBound(k/2+1).length-1;
      ans = min(ans, (fs[j..$]-b[j].to!long*(fc[j..$]-k/2))-(fs[0..j+1]-b[j].to!long*(fc[0..j+1]-k/2)));
    }

    if (i < n-k) {
      fc[c[i]] -= 1;
      fs[c[i]] -= b[c[i]];
      fc[c[i+k]] += 1;
      fs[c[i+k]] += b[c[i+k]];
    }
  }

  writeln(ans);
}

class FenwickTree(T)
{
  const size_t n;
  T[] buf;

  this(size_t n)
  {
    this.n = n;
    this.buf = new T[](n+1);
  }

  void opIndexOpAssign(string op)(T val, size_t i) if (op == "+" || op == "-")
  {
    ++i;
    for (; i <= n; i += i & -i) mixin("buf[i] " ~ op ~ "= val;");
  }

  void opIndexUnary(string op)(size_t i) if (op == "++" || op == "--")
  {
    ++i;
    for (; i <= n; i += i & -i) mixin("buf[i]" ~ op ~ ";");
  }

  pure T opSlice(size_t r, size_t l) { return get(l) - get(r); }
  pure T opIndex(size_t i) { return opSlice(i, i+1); }
  pure size_t opDollar() { return n; }

private:

  pure T get(size_t i)
  {
    auto s = T(0);
    for (; i > 0; i -= i & -i) s += buf[i];
    return s;
  }
}

yukicoder

結果

テストケース

ソースコード