ABC262-D I Hate Non-integer Number

問題へのリンク

C#のソース

using System;
using System.Collections.Generic;
using System.Linq;

class Program
{
    static string InputPattern = "InputX";

    static List<string> GetInputList()
    {
        var WillReturn = new List<string>();

        if (InputPattern == "Input1") {
            WillReturn.Add("3");
            WillReturn.Add("2 6 2");
            //6
        }
        else if (InputPattern == "Input2") {
            WillReturn.Add("5");
            WillReturn.Add("5 5 5 5 5");
            //31
        }
        else {
            string wkStr;
            while ((wkStr = Console.ReadLine()) != null) WillReturn.Add(wkStr);
        }
        return WillReturn;
    }

    const long Hou = 998244353;

    static long[] mAArr;
    static long mN;

    static void Main()
    {
        List<string> InputList = GetInputList();
        mAArr = InputList[1].Split(' ').Select(pX => long.Parse(pX)).ToArray();
        mN = mAArr.Length;

        long Answer = 0;
        for (long I = 1; I <= mN; I++) {
            long PatternCnt = ExecDP(I);
            Answer += PatternCnt;
            Answer %= Hou;
        }
        Console.WriteLine(Answer);
    }

    static long ExecDP(long pTakeCnt)
    {
        long UB0 = pTakeCnt;
        long UB1 = pTakeCnt - 1;

        // 場合の数[取得数,mod] なDP表
        long[,] DPArr = new long[UB0 + 1, UB1 + 1];
        DPArr[0, 0] = 1;

        foreach (long EachA in mAArr) {
            for (long I = UB0; 0 <= I; I--) {
                for (long J = 0; J <= UB1; J++) {
                    if (DPArr[I, J] == 0) continue;

                    long NewI = I + 1;
                    if (NewI > UB0) continue;
                    long NewJ = (J + EachA) % pTakeCnt;

                    DPArr[NewI, NewJ] += DPArr[I, J];
                    DPArr[NewI, NewJ] %= Hou;
                }
            }
        }

        return DPArr[pTakeCnt, 0];
    }
}

解説

平均が整数であることは、合計値 % 個数 = 0
であることと同値なので、
場合の数[取得数,mod] でDPしてます。

遷移において、取得数は必ず増えるので
場合の数[取得数,mod]で
取得数を添字の最初としてのリバースループを使い、インラインDPにできます。