結果
問題 | No.391 CODING WAR |
ユーザー | nebukuro09 |
提出日時 | 2017-03-10 00:32:10 |
言語 | D (dmd 2.106.1) |
結果 |
AC
|
実行時間 | 139 ms / 2,000 ms |
コード長 | 1,280 bytes |
コンパイル時間 | 805 ms |
コンパイル使用メモリ | 114,772 KB |
実行使用メモリ | 53,140 KB |
最終ジャッジ日時 | 2024-06-12 07:16:53 |
合計ジャッジ時間 | 3,175 ms |
ジャッジサーバーID (参考情報) |
judge3 / judge4 |
(要ログイン)
テストケース
テストケース表示入力 | 結果 | 実行時間 実行使用メモリ |
---|---|---|
testcase_00 | AC | 64 ms
53,140 KB |
testcase_01 | AC | 69 ms
50,680 KB |
testcase_02 | AC | 66 ms
52,520 KB |
testcase_03 | AC | 65 ms
52,868 KB |
testcase_04 | AC | 65 ms
51,284 KB |
testcase_05 | AC | 69 ms
52,100 KB |
testcase_06 | AC | 68 ms
51,960 KB |
testcase_07 | AC | 68 ms
50,952 KB |
testcase_08 | AC | 68 ms
52,200 KB |
testcase_09 | AC | 139 ms
50,812 KB |
testcase_10 | AC | 127 ms
51,084 KB |
testcase_11 | AC | 100 ms
51,520 KB |
testcase_12 | AC | 68 ms
52,248 KB |
testcase_13 | AC | 126 ms
51,728 KB |
testcase_14 | AC | 116 ms
52,316 KB |
testcase_15 | AC | 129 ms
50,660 KB |
testcase_16 | AC | 106 ms
52,292 KB |
testcase_17 | AC | 107 ms
52,160 KB |
testcase_18 | AC | 93 ms
53,016 KB |
testcase_19 | AC | 95 ms
52,356 KB |
ソースコード
import std.stdio, std.array, std.string, std.conv, std.algorithm; import std.typecons, std.range, std.random, std.math, std.container; import std.numeric, std.bigint, core.bitop, core.stdc.stdio; immutable long MAX = 2*10^^6+1; immutable long MOD = 10^^9+7; long powmod(long a, long x, long m) { a %= m; long ret = 1; while (x) { if (x % 2) ret = ret * a % m; a = a * a % m; x /= 2; } return ret; } void main() { auto modinv = new long[](MAX); modinv[0] = modinv[1] = 1; foreach(i; 2..MAX) { modinv[i] = modinv[MOD % i] * (MOD - MOD / i) % MOD; } auto f_mod = new long[](MAX); auto f_modinv = new long[](MAX); f_mod[0] = f_mod[1] = 1; f_modinv[0] = f_modinv[1] = 1; foreach(i; 2..MAX) { f_mod[i] = (i * f_mod[i-1]) % MOD; f_modinv[i] = (modinv[i] * f_modinv[i-1]) % MOD; } long nck(long n, long k) { return f_mod[n] * f_modinv[n-k] % MOD * f_modinv[k] % MOD; } auto s = readln.split.map!(to!long); auto N = s[0]; auto M = s[1]; long ans = 0; foreach (i; 0..M) { long sign = (i % 2 == 0) ? 1 : -1; ans += sign * nck(M, i) * powmod(M-i, N, MOD) % MOD; ans %= MOD; } writeln((ans + MOD) % MOD); }