結果
| 問題 | No.762 PDCAパス | 
| コンテスト | |
| ユーザー |  | 
| 提出日時 | 2018-12-10 05:56:15 | 
| 言語 | D (dmd 2.109.1) | 
| 結果 | 
                                AC
                                 
                             | 
| 実行時間 | 120 ms / 2,000 ms | 
| コード長 | 997 bytes | 
| コンパイル時間 | 900 ms | 
| コンパイル使用メモリ | 120,480 KB | 
| 実行使用メモリ | 13,944 KB | 
| 最終ジャッジ日時 | 2024-06-13 02:09:14 | 
| 合計ジャッジ時間 | 5,008 ms | 
| ジャッジサーバーID (参考情報) | judge4 / judge2 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 3 | 
| other | AC * 38 | 
ソースコード
import std.stdio, std.array, std.string, std.conv, std.algorithm;
import std.typecons, std.range, std.random, std.math, std.container;
import std.numeric, std.bigint, core.bitop, core.stdc.string;
immutable long MOD = 10^^9 + 7;
void main() {
    auto s = readln.split.map!(to!int);
    auto N = s[0];
    auto M = s[1];
    auto S = readln.chomp;
    auto G = new int[][](N);
    foreach (_; 0..M) {
        s = readln.split.map!(to!int);
        G[s[0]-1] ~= s[1]-1;
        G[s[1]-1] ~= s[0]-1;
    }
    auto cnt = new long[](N);
    foreach (i; N.iota.filter!(i => S[i] == 'D'))
        foreach (j; G[i].filter!(j => S[j] == 'P'))
            ++cnt[i];
    long ans = 0;
    foreach (i; N.iota.filter!(i => S[i] == 'C')) {
        long p = 0;
        long a = 0;
        foreach (j; G[i].filter!(j => S[j] == 'D'))
            p += cnt[j];
        foreach (j; G[i].filter!(j => S[j] == 'A'))
            a += 1;
        ans += p * a % MOD;
        ans %= MOD;
    }
    ans.writeln;
}
            
            
            
        