結果

問題 No.1359 [Zelkova 3rd Tune] 四人セゾン
ユーザー tatt61880tatt61880
提出日時 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
権限があれば一括ダウンロードができます

ソースコード

diff #
プレゼンテーションモードにする

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 x: [][]int :: #[n, 4]int
for 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 for
var ans: int :: 0
for i(0, n - 1)
do x[i].sort()
var d: int :: x[i].max() - x[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
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
0