結果

問題 No.3717 GCD LCM GCD
コンテスト
ユーザー ぽえ
提出日時 2026-09-15 09:09:03
言語 C++23
(gcc 15.3.0 + boost 1.92.0 + ACL)
コンパイル:
g++-15 -O2 -lm -std=c++23 -Wuninitialized -DONLINE_JUDGE -o a.out _filename_
実行:
./a.out
結果
AC  
実行時間 34 ms / 2,000 ms
+ 454µs
コード長 862 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 2,034 ms
コンパイル使用メモリ 335,148 KB
実行使用メモリ 12,928 KB
最終ジャッジ日時 2026-09-18 20:50:59
合計ジャッジ時間 3,799 ms
ジャッジサーバーID
（参考情報） 		judge2_0 / judge1_1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 8
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

#include <bits/stdc++.h>
using namespace std;

#include <atcoder/modint>
using mint = atcoder::modint998244353;

int main() {
    ios::sync_with_stdio(false);
    cin.tie(nullptr);
    
    int n, k; cin >> n >> k;
    vector<int> a(n); for (auto& i : a) cin >> i;
    
    int M = 1000000;
    vector<int> freq(M+1), cnt(M+1);
    for (auto& i : a) freq[i]++;
    for (int i=1; i<=M; i++) for (int j=i; j<=M; j+=i) cnt[i] += freq[j];

    vector<char> prime(M+1, true); prime[0] = prime[1] = false;
    for (long long i=2; i*i<=M; i++) if (prime[i]) {
        for (int j=i*i; j<=M; j+=i) {
            prime[j] = false;
        }
    }

    mint ans = 1;
    for (int i=2; i<=M; i++) if (prime[i]) {
        for (long long j=i; j<=M && n-n/k<cnt[j]; j*=i) {
            ans *= i;
            if (M/i < j) break;
        }
    }

    cout << ans.val() << '\n';
}
0