結果

問題 No.2017 Mod7 Parade
ユーザー kakel-sankakel-san
提出日時 2022-07-22 22:10:11
言語 C#(csc)
(csc 3.9.0)
結果
AC  
実行時間 302 ms / 2,000 ms
コード長 2,009 bytes
コンパイル時間 2,120 ms
コンパイル使用メモリ 113,288 KB
実行使用メモリ 27,520 KB
最終ジャッジ日時 2024-07-04 06:34:59
合計ジャッジ時間 6,995 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 18
権限があれば一括ダウンロードができます
コンパイルメッセージ
Microsoft (R) Visual C# Compiler version 3.9.0-6.21124.20 (db94f4cc)
Copyright (C) Microsoft Corporation. All rights reserved.

ソースコード

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(int n) => Enumerable.Repeat(0, n).Select(_ => NList).ToArray();
    static void Main()
    {
        var k = NN;
        var map = NArr(k);

        var nexts = new int[10][];
        nexts[0] = new int[] { 0, 3, 6, 2, 5, 1, 4 };
        for (var i = 1; i < 7; ++i)
        {
            nexts[i] = new int[7];
            for (var j = 0; j < 7; ++j) nexts[i][j] = (nexts[i - 1][j] + 1) % 7;
        }
        var dbl = new List<int[]>[7];
        for (var i = 0; i < dbl.Length; ++i)
        {
            dbl[i] = new List<int[]>();
            dbl[i].Add((int[])nexts[i].Clone());
        }
        var mod = 1_000_000_007;
        var dp = new long[7];
        dp[0] = 1;
        for (var i = 0; i < k; ++i)
        {
            var next = (long[]) dp.Clone();
            var to = new int[] { 0, 1, 2, 3, 4, 5, 6 };
            var d = map[i][0] % 7;
            var l = map[i][1];
            var cnt = 0;
            while (l > 0)
            {
                if (cnt >= dbl[d].Count)
                {
                    var newarr = new int[7];
                    for (var j = 0; j < newarr.Length; ++j) newarr[j] = dbl[d][cnt - 1][dbl[d][cnt - 1][j]];
                    dbl[d].Add(newarr);
                }
                if (l % 2 == 1)
                {
                    for (var j = 0; j < to.Length; ++j) to[j] = dbl[d][cnt][to[j]];
                }
                ++cnt;
                l >>= 1;
            }
            for (var j = 0; j < to.Length; ++j) next[to[j]] = (next[to[j]] + dp[j]) % mod;
            dp = next;
        }
        var res = 0L;
        for (var i = 0; i < dp.Length; ++i) res = (res + dp[i] * i) % mod;
        WriteLine(res);
    }

}
0