結果

問題 No.1529 Constant Lcm
コンテスト
ユーザー kakel-san
提出日時 2024-05-12 00:10:54
言語 C#
(.NET 8.0.404)
結果
AC  
実行時間 1,686 ms / 3,000 ms
コード長 2,668 bytes
コンパイル時間 8,256 ms
コンパイル使用メモリ 167,148 KB
実行使用メモリ 478,188 KB
最終ジャッジ日時 2024-12-20 08:55:24
合計ジャッジ時間 27,445 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 2
other AC * 24
権限があれば一括ダウンロードができます
コンパイルメッセージ
  復元対象のプロジェクトを決定しています...
  /home/judge/data/code/main.csproj を復元しました (102 ms)。
MSBuild のバージョン 17.9.6+a4ecab324 (.NET)
  main -> /home/judge/data/code/bin/Release/net8.0/main.dll
  main -> /home/judge/data/code/bin/Release/net8.0/publish/

ソースコード

diff # 

using System;
using static System.Console;
using System.Linq;
using System.Collections.Generic;

class Program
{
    static int NN => int.Parse(ReadLine());
    static int[] NList => ReadLine().Split().Select(int.Parse).ToArray();
    static int[][] NArr(long n) => Enumerable.Repeat(0, (int)n).Select(_ => NList).ToArray();
    public static void Main()
    {
        Solve();
    }
    static void Solve()
    {
        var n = NN;
        var dlist = new Dictionary<int, int>[n - 1];
        var mlist = GetMinPDivList(n);
        for (var i = 0; i < dlist.Length; ++i)
        {
            var p = PDiv(i + 1, mlist);
            dlist[i] = new Dictionary<int, int>();
            foreach (var pi in p)
            {
                if (dlist[i].ContainsKey(pi)) ++dlist[i][pi];
                else dlist[i][pi] = 1;
            }
        }
        var ansd = new Dictionary<int, int>();
        for (var i = 0; i < dlist.Length; ++i)
        {
            var rev = dlist.Length - i - 1;
            if (rev < i) break;
            foreach (var kv in dlist[i])
            {
                var val = kv.Value + (dlist[rev].ContainsKey(kv.Key) ? dlist[rev][kv.Key] : 0);
                if (ansd.ContainsKey(kv.Key)) ansd[kv.Key] = Math.Max(ansd[kv.Key], val);
                else ansd[kv.Key] = val;
            }
            foreach (var kv in dlist[rev])
            {
                if (dlist[i].ContainsKey(kv.Key)) continue;
                if (ansd.ContainsKey(kv.Key)) ansd[kv.Key] = Math.Max(ansd[kv.Key], kv.Value);
                else ansd[kv.Key] = kv.Value;
            }
        }
        var ans = 1L;
        var mod = 998_244_353;
        foreach (var kv in ansd)
        {
            for (var i = 0; i < kv.Value; ++i) ans = ans * kv.Key % mod;
        }
        WriteLine(ans);
    }
    static int[] GetMinPDivList(int max)
    {
        var minPDivList = new int[max + 1];
        for (var i = 0; i <= max; ++i) minPDivList[i] = i;

        for (var i = 2; i * i <= max; ++i) if (minPDivList[i] == i)
        {
            for (var j = i * i; j <= max; j += i) if (minPDivList[j] == j)
            {
                minPDivList[j] = i;
            }
        }
        return minPDivList;
    }
    static List<int> PDiv(int n, int[] minPDivList)
    {
        var p = minPDivList[n];
        if (n == p)
        {
            var dic = new List<int>();
            dic.Add(p);
            return dic;
        }
        else
        {
            var dic = PDiv(n / p, minPDivList);
            dic.Add(p);
            return dic;
        }
    }

}
0