結果

問題 No.2326 Factorial to the Power of Factorial to the...
ユーザー pengin_2000pengin_2000
提出日時 2023-05-28 14:39:26
言語 C
(gcc 13.3.0)
結果
AC  
実行時間 3 ms / 2,000 ms
コード長 637 bytes
コンパイル時間 461 ms
コンパイル使用メモリ 30,080 KB
実行使用メモリ 5,248 KB
最終ジャッジ日時 2024-12-27 02:21:36
合計ジャッジ時間 1,746 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 2
other AC * 20
権限があれば一括ダウンロードができます

ソースコード

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 - 1);
	printf("%lld\n", ans * modpow(fact, fact2, prime) % prime);
	return 0;
}
0