結果

問題 No.334 門松ゲーム
ユーザー te-shte-sh
提出日時 2017-07-05 16:07:59
言語 D
(dmd 2.106.1)
結果
AC  
実行時間 5 ms / 2,000 ms
コード長 885 bytes
コンパイル時間 692 ms
コンパイル使用メモリ 94,232 KB
実行使用メモリ 4,380 KB
最終ジャッジ日時 2023-09-03 14:59:41
合計ジャッジ時間 1,753 ms
ジャッジサーバーID
（参考情報） 		judge15 / judge13
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 1 ms
4,380 KB
testcase_01 AC 2 ms
4,380 KB
testcase_02 AC 4 ms
4,380 KB
testcase_03 AC 1 ms
4,376 KB
testcase_04 AC 2 ms
4,380 KB
testcase_05 AC 2 ms
4,380 KB
testcase_06 AC 3 ms
4,380 KB
testcase_07 AC 3 ms
4,380 KB
testcase_08 AC 2 ms
4,380 KB
testcase_09 AC 2 ms
4,376 KB
testcase_10 AC 5 ms
4,380 KB
testcase_11 AC 2 ms
4,380 KB
testcase_12 AC 2 ms
4,376 KB
testcase_13 AC 1 ms
4,376 KB
testcase_14 AC 2 ms
4,376 KB
testcase_15 AC 2 ms
4,376 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

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

void main()
{
  auto n = readln.chomp.to!size_t;
  auto k = readln.split.to!(int[]);

  auto r = winMe(k);
  if (r.equal([0,0,0]))
    writeln(-1);
  else
    writeln(r.to!(string[]).join(" "));
}

size_t[][] combis(int[] k)
{
  auto n = k.length;
  size_t[][] r;

  foreach (i1; 0..n)
    foreach (i2; i1+1..n)
      foreach (i3; i2+1..n)
        if (isKadomatsu(k[i1], k[i2], k[i3]))
          r ~= [i1, i2, i3];

  return r;
}

size_t[] winMe(int[] k)
{
  auto c = combis(k);
  if (c.empty) return [0,0,0];

  foreach (ci; c) {
    auto nk = k[0..ci[0]] ~ k[ci[0]+1..ci[1]] ~ k[ci[1]+1..ci[2]] ~ k[ci[2]+1..$];
    auto r = winMe(nk);
    if (r.equal([0,0,0])) return ci;
  }

  return [0,0,0];
}

auto isKadomatsu(int a, int b, int c)
{
  return a != b && b != c && c != a && (a > b && c > b || a < b && c < b);
}
0