結果

問題 No.118 門松列(2)
ユーザー noriocnorioc
提出日時 2017-09-05 01:11:06
言語 D
(dmd 2.106.1)
結果
AC  
実行時間 11 ms / 5,000 ms
コード長 715 bytes
コンパイル時間 760 ms
コンパイル使用メモリ 92,788 KB
実行使用メモリ 6,460 KB
最終ジャッジ日時 2023-09-03 16:09:28
合計ジャッジ時間 2,213 ms
ジャッジサーバーID
（参考情報） 		judge15 / judge14
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 3 ms
4,384 KB
testcase_01 AC 10 ms
5,704 KB
testcase_02 AC 10 ms
6,460 KB
testcase_03 AC 9 ms
5,716 KB
testcase_04 AC 11 ms
5,632 KB
testcase_05 AC 11 ms
5,444 KB
testcase_06 AC 2 ms
4,380 KB
testcase_07 AC 2 ms
4,376 KB
testcase_08 AC 2 ms
4,380 KB
testcase_09 AC 10 ms
5,156 KB
testcase_10 AC 4 ms
4,376 KB
testcase_11 AC 4 ms
4,376 KB
testcase_12 AC 3 ms
4,380 KB
testcase_13 AC 2 ms
4,380 KB
testcase_14 AC 9 ms
5,080 KB
testcase_15 AC 2 ms
4,376 KB
testcase_16 AC 5 ms
4,820 KB
testcase_17 AC 3 ms
4,380 KB
testcase_18 AC 3 ms
4,376 KB
testcase_19 AC 5 ms
4,384 KB
testcase_20 AC 6 ms
4,376 KB
testcase_21 AC 7 ms
6,096 KB
testcase_22 AC 4 ms
4,512 KB
testcase_23 AC 7 ms
4,384 KB
testcase_24 AC 4 ms
4,376 KB
testcase_25 AC 5 ms
4,384 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