結果
問題 | No.1359 [Zelkova 3rd Tune] 四人セゾン |
ユーザー |
|
提出日時 | 2021-02-20 19:46:58 |
言語 | Kuin (KuinC++ v.2021.9.17) |
結果 |
AC
|
実行時間 | 715 ms / 2,000 ms |
コード長 | 1,008 bytes |
コンパイル時間 | 2,325 ms |
コンパイル使用メモリ | 148,352 KB |
実行使用メモリ | 32,000 KB |
最終ジャッジ日時 | 2024-09-16 11:32:29 |
合計ジャッジ時間 | 41,351 ms |
ジャッジサーバーID (参考情報) |
judge4 / 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]intvar e: []int :: #[n]intvar a: []int :: #[n]intvar h: []int :: #[n]intfor i(0, n - 1)do p[i] :: cui@inputInt()end forfor i(0, n - 1)do e[i] :: cui@inputInt()end forfor i(0, n - 1)do a[i] :: cui@inputInt()end forfor i(0, n - 1)do h[i] :: cui@inputInt()end fordo p.sort()do e.sort()do a.sort()do h.sort()var x: [][]int :: #[n, 4]intfor i(0, n - 1)do x[i][0] :: p[i]do x[i][1] :: e[i]do x[i][2] :: a[i]do x[i][3] :: h[i]end forvar ans: int :: 0for i(0, n - 1)do x[i].sort()var d: int :: x[i].max() - x[i].min()do ans :+ modPow(d, k, m)end fordo ans :% mdo cui@print("\{ans}\n")func modPow(a: int, b: int, mod: int): intif(b = 0)ret 1end ifvar res: int :: modPow(a, b / 2, mod)do res :: res * res % modif(b % 2 = 1)do res :: res * a % modend ifret resend funcend func