結果
問題 |
No.1359 [Zelkova 3rd Tune] 四人セゾン
|
ユーザー |
|
提出日時 | 2021-02-20 19:49:12 |
言語 | Kuin (KuinC++ v.2021.9.17) |
結果 |
AC
|
実行時間 | 747 ms / 2,000 ms |
コード長 | 889 bytes |
コンパイル時間 | 2,282 ms |
コンパイル使用メモリ | 147,988 KB |
実行使用メモリ | 9,984 KB |
最終ジャッジ日時 | 2024-09-16 11:31:41 |
合計ジャッジ時間 | 38,752 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 75 |
ソースコード
func main() var n: int :: cui@inputInt() var k: int :: cui@inputInt() var m: int :: cui@inputInt() var p: []int :: #[n]int var e: []int :: #[n]int var a: []int :: #[n]int var h: []int :: #[n]int for i(0, n - 1) do p[i] :: cui@inputInt() end for for i(0, n - 1) do e[i] :: cui@inputInt() end for for i(0, n - 1) do a[i] :: cui@inputInt() end for for i(0, n - 1) do h[i] :: cui@inputInt() end for do p.sort() do e.sort() do a.sort() do h.sort() var ans: int :: 0 for i(0, n - 1) var d: int :: [p[i], e[i], a[i], h[i]].max() - [p[i], e[i], a[i], h[i]].min() do ans :+ modPow(d, k, m) end for do ans :% m do cui@print("\{ans}\n") func modPow(a: int, b: int, mod: int): int if(b = 0) ret 1 end if var res: int :: modPow(a, b / 2, mod) do res :: res * res % mod if(b % 2 = 1) do res :: res * a % mod end if ret res end func end func