結果

問題 No.430 文字列検索
ユーザー iwkjoseciwkjosec
提出日時 2019-10-04 10:36:20
言語 C#(csc)
(csc 3.9.0)
結果
WA  
実行時間 -
コード長 3,517 bytes
コンパイル時間 963 ms
コンパイル使用メモリ 108,032 KB
実行使用メモリ 22,016 KB
最終ジャッジ日時 2024-11-10 00:35:28
合計ジャッジ時間 1,880 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge3
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 22 ms
17,792 KB
testcase_01 WA -
testcase_02 AC 30 ms
18,176 KB
testcase_03 AC 30 ms
18,432 KB
testcase_04 WA -
testcase_05 AC 23 ms
17,664 KB
testcase_06 WA -
testcase_07 WA -
testcase_08 WA -
testcase_09 WA -
testcase_10 WA -
testcase_11 WA -
testcase_12 AC 34 ms
20,096 KB
testcase_13 AC 33 ms
20,224 KB
testcase_14 AC 32 ms
19,072 KB
testcase_15 AC 33 ms
19,072 KB
testcase_16 AC 30 ms
18,176 KB
testcase_17 AC 30 ms
18,688 KB
権限があれば一括ダウンロードができます
コンパイルメッセージ
Microsoft (R) Visual C# Compiler version 3.9.0-6.21124.20 (db94f4cc)
Copyright (C) Microsoft Corporation. All rights reserved.

ソースコード

diff # 

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

class Program
{
    static void Main()
    {
        var s = ReadLine();
        var m = int.Parse(ReadLine());
        var rh = new RollingHash(s);
        var d = new Map<ulong, int>();
        for (int i = 0; i <= s.Length - 10; i++)
        {
            d[rh.Hash(i, i + 10)]++;
        }
        var a = 0;
        for (int i = 0; i < m; i++)
        {
            var c = ReadLine();
            var h = RollingHash.ComputeHash(c);
            a += d[h];
        }
        WriteLine(a);
    }
}

public class Map<TKey, TValue> : Dictionary<TKey, TValue>
{
    public Map() { }
    public Map(int capacity) : base(capacity) { }
    public Map(IEqualityComparer<TKey> comparer) : base(comparer) { }
    public Map(int capacity, IEqualityComparer<TKey> comparer) : base(capacity, comparer) { }
    public Map(IDictionary<TKey, TValue> dictionary) : base(dictionary) { }
    public Map(IDictionary<TKey, TValue> dictionary, IEqualityComparer<TKey> comparer) : base(dictionary, comparer) { }
    public Map(IEnumerable<KeyValuePair<TKey, TValue>> collection) : base(collection) { }
    public Map(IEnumerable<KeyValuePair<TKey, TValue>> collection, IEqualityComparer<TKey> comparer) : base(collection, comparer) { }

    public new TValue this[TKey key]
    {
        get => TryGetValue(key, out var value) ? value : default;
        set => base[key] = value;
    }
}

public class RollingHash
{
    ulong[] hash;
    ulong[] pow;
    const ulong @base = 131;
    const ulong mod = (1UL << 61) - 1;
    const ulong MASK30 = (1UL << 30) - 1;
    const ulong MASK31 = (1UL << 31) - 1;

    static ulong Mul(ulong a, ulong b)
    {
        var au = a >> 31;
        var ad = a & MASK31;
        var bu = b >> 31;
        var bd = b & MASK31;
        var mid = ad * bu + au * bd;
        var midu = mid >> 30;
        var midd = (mid & MASK30);
        return CalcMod(au * bu * 2 + midu + (midd << 31) + ad * bd);
    }

    static ulong CalcMod(ulong val)
    {
        val = (val & mod) + (val >> 61);
        if (val > mod) val -= mod;
        return val;
    }

    public RollingHash(string s)
    {
        hash = new ulong[s.Length + 1];
        pow = new ulong[s.Length + 1];
        pow[0] = 1;
        for (int i = 1; i < pow.Length; i++)
        {
            pow[i] = Mul(pow[i - 1], @base);
            hash[i] = (Mul(hash[i - 1], @base) + s[i - 1]) % mod;
        }
    }

    public RollingHash(int[] s)
    {
        hash = new ulong[s.Length + 1];
        pow = new ulong[s.Length + 1];
        pow[0] = 1;
        for (int i = 1; i < pow.Length; i++)
        {
            pow[i] = Mul(pow[i - 1], @base);
            hash[i] = (Mul(hash[i - 1], @base) + (ulong)s[i - 1]) % mod;
        }
    }

    public static ulong ComputeHash(string s)
    {
        var h = 0UL;
        for (int i = 0; i < s.Length; i++)
        {
            h = (h + s[i]) % mod;
            if (i != s.Length - 1) h = Mul(h, @base);
        }
        return h;
    }

    public static ulong ComputeHash(int[] s)
    {
        var h = 0UL;
        for (int i = 0; i < s.Length; i++)
        {
            h = (h + (ulong)s[i]) % mod;
            if (i != s.Length - 1) h = Mul(h, @base);
        }
        return h;
    }

    public ulong Hash(int l, int r)
    {
        var a = hash[r];
        var b = Mul(hash[l], pow[r - l]);
        if (a < b) a += mod;
        return (a - b) % mod; ;
    }
}
0