結果

問題 No.118 門松列(2)
ユーザー te-sh
提出日時 2016-08-30 20:59:26
言語 D
(dmd 2.109.1)
結果
WA  
実行時間 -
コード長 548 bytes
コンパイル時間 922 ms
コンパイル使用メモリ 122,272 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-06-12 03:52:46
合計ジャッジ時間 1,830 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 25 WA * 1
権限があれば一括ダウンロードができます

ソースコード

diff # 

import std.algorithm, std.array, std.container, std.range;
import std.string, std.conv;
import std.math, std.bigint, std.bitmanip, std.random;
import std.stdio, std.typecons;

const auto mod = 10 ^^ 9 + 7;

void main()
{
  auto n = readln.chomp.to!ulong;
  auto ai = readln.split.map!(to!int).array;
  ai.sort();
  auto gi = ai.group;

  auto r = n * (n - 1) * (n - 2) / 6;
  foreach (g; gi) {
    auto c = g[1];
    if (c >= 2)
      r -= c * (c - 1) / 2 * (n - c);
    if (c >= 3)
      r -= c * (c - 1) * (c - 2) / 6;
  }

  writeln(r % mod);
}
0