結果
問題 | No.1359 [Zelkova 3rd Tune] 四人セゾン |
ユーザー |
![]() |
提出日時 | 2021-01-22 22:07:22 |
言語 | Rust (1.83.0 + proconio) |
結果 |
AC
|
実行時間 | 305 ms / 2,000 ms |
コード長 | 2,116 bytes |
コンパイル時間 | 24,952 ms |
コンパイル使用メモリ | 377,608 KB |
実行使用メモリ | 16,640 KB |
最終ジャッジ日時 | 2024-12-28 01:09:07 |
合計ジャッジ時間 | 33,991 ms |
ジャッジサーバーID (参考情報) |
judge4 / judge1 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 75 |
ソースコード
// ---------- begin input macro ----------// reference: https://qiita.com/tanakh/items/0ba42c7ca36cd29d0ac8macro_rules! input {(source = $s:expr, $($r:tt)*) => {let mut iter = $s.split_whitespace();input_inner!{iter, $($r)*}};($($r:tt)*) => {let s = {use std::io::Read;let mut s = String::new();std::io::stdin().read_to_string(&mut s).unwrap();s};let mut iter = s.split_whitespace();input_inner!{iter, $($r)*}};}macro_rules! input_inner {($iter:expr) => {};($iter:expr, ) => {};($iter:expr, $var:ident : $t:tt $($r:tt)*) => {let $var = read_value!($iter, $t);input_inner!{$iter $($r)*}};}macro_rules! read_value {($iter:expr, ( $($t:tt),* )) => {( $(read_value!($iter, $t)),* )};($iter:expr, [ $t:tt ; $len:expr ]) => {(0..$len).map(|_| read_value!($iter, $t)).collect::<Vec<_>>()};($iter:expr, chars) => {read_value!($iter, String).chars().collect::<Vec<char>>()};($iter:expr, bytes) => {read_value!($iter, String).bytes().collect::<Vec<u8>>()};($iter:expr, usize1) => {read_value!($iter, usize) - 1};($iter:expr, $t:ty) => {$iter.next().unwrap().parse::<$t>().expect("Parse error")};}// ---------- end input macro ----------fn pow_mod(r: u64, mut n: u64, m: u64) -> u64 {let mut t = 1 % m;let mut s = r % m;while n > 0 {if n & 1 == 1 {t = t * s % m;}s = s * s % m;n >>= 1;}t}fn run() {input! {n: usize,k: u64,m: u64,p: [[u64; n]; 4],}let mut p = p;p.iter_mut().for_each(|p| p.sort());let mut ans = 0;for _ in 0..n {let mut a = [0u64; 4];for (a, p) in a.iter_mut().zip(p.iter_mut()) {*a = p.pop().unwrap();}a.sort();ans += pow_mod(a[3] - a[0], k, m);}ans %= m;println!("{}", ans);}fn main() {run();}