結果
| 問題 | 
                            No.118 門松列(2)
                             | 
                    
| コンテスト | |
| ユーザー | 
                             diginatu
                         | 
                    
| 提出日時 | 2015-01-07 00:07:37 | 
| 言語 | D  (dmd 2.109.1)  | 
                    
| 結果 | 
                             
                                WA
                                 
                             
                            
                         | 
                    
| 実行時間 | - | 
| コード長 | 743 bytes | 
| コンパイル時間 | 925 ms | 
| コンパイル使用メモリ | 107,776 KB | 
| 実行使用メモリ | 5,376 KB | 
| 最終ジャッジ日時 | 2024-06-12 01:59:25 | 
| 合計ジャッジ時間 | 1,977 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge3 / judge5 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| other | AC * 4 WA * 22 | 
ソースコード
import std.stdio, std.conv, std.math, std.string, std.range, std.array,
       std.algorithm;
immutable MOD = 10^^9 + 7;
// コンパイル時定数よい
ulong combination(int n, int r){
	if (r == 0) return 1;
	if (r > n/2) return combination(n,n-r);
	ulong ret=1;
	for (int i = 1; i <= r; ++i)
		ret = (ret*(n-i+1)/i) % MOD;
	return ret;
}
void main(){
  readln();
  auto A = readln().strip().split().map!(to!int)().array();
  A.sort();
  long mul = 1;
  int spnum = 1;
  int k;
  while(k < A.length-1) {
    int tmul = 1;
    while(k < A.length-1 && A[k] == A[k+1]) {
      ++ tmul;
      ++ k;
    }
    if(k >= A.length-1) -- spnum;
    mul *= tmul%MOD;
    ++ spnum;
    ++ k;
  }
  writeln((spnum.combination(3) * mul) % MOD);
}
            
            
            
        
            
diginatu