結果
問題 | No.2326 Factorial to the Power of Factorial to the... |
ユーザー | InTheBloom |
提出日時 | 2023-05-28 15:52:12 |
言語 | D (dmd 2.106.1) |
結果 |
AC
|
実行時間 | 46 ms / 2,000 ms |
コード長 | 819 bytes |
コンパイル時間 | 1,497 ms |
コンパイル使用メモリ | 174,516 KB |
実行使用メモリ | 6,944 KB |
最終ジャッジ日時 | 2024-06-22 18:03:29 |
合計ジャッジ時間 | 2,728 ms |
ジャッジサーバーID (参考情報) |
judge4 / judge2 |
(要ログイン)
テストケース
テストケース表示入力 | 結果 | 実行時間 実行使用メモリ |
---|---|---|
testcase_00 | AC | 3 ms
6,816 KB |
testcase_01 | AC | 45 ms
6,940 KB |
testcase_02 | AC | 11 ms
6,940 KB |
testcase_03 | AC | 34 ms
6,944 KB |
testcase_04 | AC | 23 ms
6,940 KB |
testcase_05 | AC | 18 ms
6,944 KB |
testcase_06 | AC | 30 ms
6,944 KB |
testcase_07 | AC | 45 ms
6,940 KB |
testcase_08 | AC | 46 ms
6,944 KB |
testcase_09 | AC | 44 ms
6,940 KB |
testcase_10 | AC | 4 ms
6,944 KB |
testcase_11 | AC | 9 ms
6,940 KB |
testcase_12 | AC | 3 ms
6,944 KB |
testcase_13 | AC | 21 ms
6,940 KB |
testcase_14 | AC | 38 ms
6,944 KB |
testcase_15 | AC | 7 ms
6,944 KB |
testcase_16 | AC | 2 ms
6,940 KB |
testcase_17 | AC | 40 ms
6,940 KB |
testcase_18 | AC | 15 ms
6,940 KB |
testcase_19 | AC | 5 ms
6,944 KB |
testcase_20 | AC | 1 ms
6,940 KB |
testcase_21 | AC | 1 ms
6,940 KB |
ソースコード
import std; void main () { auto buf = readln.split.to!(int[]); int N = buf[0], P = buf[1]; solve(N, P); } void solve (int N, int P) { const int MOD = 1_000_000_007; long factorialN = 1; foreach (i; 2..N+1) { factorialN *= i; factorialN %= MOD; } foreach (i; 2..N+1) { factorialN = modpow(factorialN, i, MOD); } long X = 0; { long base = P; while (N/base != 0) { X += N/P; base *= P; } } writeln((X*factorialN) % MOD); } long modpow (long x, long a, const long MOD) { if (a == 0) { return 1; } if (a == 1) { return x; } if (a % 2 == 1) { return (x * modpow(x, a-1, MOD)) % MOD; } long t = modpow(x, a/2, MOD); return (t * t) % MOD; }