結果

問題 No.2326 Factorial to the Power of Factorial to the...
ユーザー pengin_2000pengin_2000
提出日時 2023-05-28 14:35:50
言語 C
(gcc 12.3.0)
結果
WA  
実行時間 -
コード長 637 bytes
コンパイル時間 307 ms
コンパイル使用メモリ 29,952 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-08 05:47:26
合計ジャッジ時間 1,007 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge1
このコードへのチャレンジ
（要ログイン）

テストケース

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

ソースコード

diff # 

#include<stdio.h>
long long int modpow(long long int a, long long int n, long long int p)
{
	long long int res = 1;
	for (; n > 0; n /= 2, a = a * a % p)
		if (n % 2 > 0)
			res = res * a % p;
	return res;
}
int main()
{
	long long int n, p;
	scanf("%lld %lld", &n, &p);
	const long long int prime = 1000000007;
	long long int ans = 0, i;
	for (i = n; i >= p; i /= p)
		ans += i / p;
	ans %= prime;
	long long int fact = 1;
	for (i = 1; i <= n; i++)
		fact = fact * i % prime;
	long long int fact2 = 1;
	for (i = 1; i <= n; i++)
		fact2 = fact2 * i % (prime - 2);
	printf("%lld\n", ans * modpow(fact, fact2, prime) % prime);
	return 0;
}
0