結果

問題 No.118 門松列(2)
ユーザー noriocnorioc
提出日時 2017-09-05 01:11:06
言語 D
(dmd 2.106.1)
結果
AC  
実行時間 12 ms / 5,000 ms
コード長 715 bytes
コンパイル時間 854 ms
コンパイル使用メモリ 103,500 KB
実行使用メモリ 6,948 KB
最終ジャッジ日時 2024-06-12 21:49:20
合計ジャッジ時間 1,994 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge2
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 2 ms
6,812 KB
testcase_01 AC 11 ms
6,940 KB
testcase_02 AC 11 ms
6,944 KB
testcase_03 AC 10 ms
6,940 KB
testcase_04 AC 12 ms
6,948 KB
testcase_05 AC 10 ms
6,940 KB
testcase_06 AC 2 ms
6,944 KB
testcase_07 AC 2 ms
6,940 KB
testcase_08 AC 2 ms
6,940 KB
testcase_09 AC 10 ms
6,940 KB
testcase_10 AC 3 ms
6,944 KB
testcase_11 AC 4 ms
6,940 KB
testcase_12 AC 3 ms
6,940 KB
testcase_13 AC 2 ms
6,944 KB
testcase_14 AC 9 ms
6,940 KB
testcase_15 AC 2 ms
6,940 KB
testcase_16 AC 6 ms
6,940 KB
testcase_17 AC 2 ms
6,940 KB
testcase_18 AC 4 ms
6,940 KB
testcase_19 AC 6 ms
6,944 KB
testcase_20 AC 6 ms
6,940 KB
testcase_21 AC 8 ms
6,944 KB
testcase_22 AC 4 ms
6,940 KB
testcase_23 AC 8 ms
6,940 KB
testcase_24 AC 5 ms
6,940 KB
testcase_25 AC 6 ms
6,944 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

import std.algorithm;
import std.array;
import std.conv;
import std.math;
import std.range;
import std.stdio;
import std.string;
import std.typecons;

int readint() {
    return readln.chomp.to!int;
}

int[] readints() {
    return readln.split.map!(to!int).array;
}

long calc(int[] xs) {
    const MOD = 1_000_000_007;

    long[101] sum;
    foreach (x; xs)
        sum[x]++;

    long ans = 0;
    for (int i = 1; i <= 100; i++) {
        for (int j = i + 1; j <= 100; j++) {
            for (int k = j + 1; k <= 100; k++) {
                ans = (ans + sum[i] * sum[j] * sum[k]) % MOD;
            }
        }
    }
    return ans;
}

void main() {
    readln;
    auto xs = readints;
    writeln(calc(xs));
}
0