結果

問題 No.243 出席番号(2)
ユーザー koyumeishikoyumeishi
提出日時 2015-07-11 02:25:22
言語 C++11
(gcc 11.4.0)
結果
AC  
実行時間 35 ms / 2,000 ms
コード長 1,781 bytes
コンパイル時間 592 ms
コンパイル使用メモリ 79,168 KB
実行使用メモリ 6,900 KB
最終ジャッジ日時 2023-09-22 10:52:52
合計ジャッジ時間 2,590 ms
ジャッジサーバーID
（参考情報） 		judge13 / judge15
このコードへのチャレンジ（β）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 6 ms
6,552 KB
testcase_01 AC 6 ms
6,488 KB
testcase_02 AC 6 ms
6,488 KB
testcase_03 AC 7 ms
6,556 KB
testcase_04 AC 7 ms
6,512 KB
testcase_05 AC 7 ms
6,504 KB
testcase_06 AC 7 ms
6,640 KB
testcase_07 AC 8 ms
6,508 KB
testcase_08 AC 11 ms
6,524 KB
testcase_09 AC 11 ms
6,532 KB
testcase_10 AC 11 ms
6,528 KB
testcase_11 AC 11 ms
6,524 KB
testcase_12 AC 10 ms
6,592 KB
testcase_13 AC 16 ms
6,620 KB
testcase_14 AC 17 ms
6,592 KB
testcase_15 AC 17 ms
6,544 KB
testcase_16 AC 17 ms
6,616 KB
testcase_17 AC 16 ms
6,612 KB
testcase_18 AC 25 ms
6,756 KB
testcase_19 AC 25 ms
6,632 KB
testcase_20 AC 24 ms
6,624 KB
testcase_21 AC 25 ms
6,632 KB
testcase_22 AC 25 ms
6,568 KB
testcase_23 AC 35 ms
6,640 KB
testcase_24 AC 35 ms
6,640 KB
testcase_25 AC 35 ms
6,576 KB
testcase_26 AC 35 ms
6,588 KB
testcase_27 AC 35 ms
6,900 KB
testcase_28 AC 6 ms
6,492 KB
testcase_29 AC 6 ms
6,540 KB
testcase_30 AC 5 ms
6,556 KB
testcase_31 AC 5 ms
6,492 KB
testcase_32 AC 6 ms
6,488 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

#include <iostream>
#include <vector>
#include <cstdio>
#include <sstream>
#include <map>
#include <string>
#include <algorithm>
#include <queue>
#include <cmath>
#include <set>
using namespace std;

#define MOD 1000000007

//n! mod p table
long long fact[400000+1];

void make_fact(long long p){
	fact[0] = 1;
	for(int i=1; i<=400000; i++){
		fact[i] = ((long long)fact[i-1]*i%p)%p;
	}
}

long long extgcd(long long a, long long b, long long &x, long long &y){
	long long d=a;
	if(b!=0){
		d = extgcd(b, a%b, y, x);
		y -= (a/b) * x;
	}else{
		x = 1;
		y = 0;
	}
	return d;
}

long long mod_inverse(long long a, long long m){
	long long x,y;
	extgcd(a,m,x,y);
	return (m+x%m)%m;
}

long long mod_fact(long long n, long long p, long long &e){
	e = 0;
	if(n==0) return 1;

	long long res = mod_fact(n/p, p, e);
	e += n/p;

	if(n/p %2 != 0) return res * (p-fact[n%p]) %p;
	return res * fact[n%p]%p;
}

//nCk mod p
long long mod_comb(long long n, long long k, long long p){
	if(n<0 || k<0 || n<k) return 0;
	long long e1,e2,e3;
	long long a1 = mod_fact(n,p,e1);
	long long a2 = mod_fact(k,p,e2);
	long long a3 = mod_fact(n-k,p,e3);

	if(e1 > e2+e3) return 0;
	return a1 * mod_inverse(a2*a3 %p, p) %p;
}


int main(){
	make_fact(MOD);

	int N;
	cin >> N;
	vector<int> cnt(5000, 0);
	vector<int> A(N);
	for(int i=0; i<N; i++){
		cin >> A[i];
		cnt[A[i]]++;
	}
	long long ans = 0;
	vector<long long> dp(N+1, 0);
	dp[0] = 1;

	for(int i=0; i<N; i++){
		vector<long long> dp_ = dp;
		for(int j=0; j<=i; j++){
			dp_[j+1] += cnt[i] * dp[j];
			dp_[j+1] %= MOD;
		}
		swap(dp, dp_);
	}

	ans = fact[N];
	for(int i=1; i<=N; i++){
		//cerr << dp[i] << " ";
		ans -= dp[i] * (i%2==0?-1:+1) * fact[N-i] % MOD;
		ans = (ans%MOD + MOD)%MOD;
	}
	//cerr << endl;

	cout << ans << endl;

	return 0;
}
0