結果
問題 | No.1972 Modulo Set |
ユーザー | kokatsu |
提出日時 | 2022-06-10 21:34:01 |
言語 | D (dmd 2.109.1) |
結果 |
AC
|
実行時間 | 57 ms / 2,000 ms |
コード長 | 604 bytes |
コンパイル時間 | 2,018 ms |
コンパイル使用メモリ | 209,180 KB |
実行使用メモリ | 15,016 KB |
最終ジャッジ日時 | 2024-06-22 15:25:05 |
合計ジャッジ時間 | 5,184 ms |
ジャッジサーバーID (参考情報) |
judge4 / judge1 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 34 |
ソースコード
import std; void main() { long N, M; readf("%d %d\n", N, M); auto A = readln.chomp.split.to!(long[]); long[long] list; foreach (a; A) ++list[a%M]; bool[long] used; long res; foreach (key, val; list) { if (key in used) continue; if ((key * 2) % M == 0) { ++res; } else { long d = M - key, num = val; if (d in list) { if (num < list[d]) num = list[d]; used[d] = true; } res += num; } used[key] = true; } res.writeln; }