結果
| 問題 | No.843 Triple Primes | 
| コンテスト | |
| ユーザー |  kokatsu | 
| 提出日時 | 2021-12-01 22:51:14 | 
| 言語 | D (dmd 2.109.1) | 
| 結果 | 
                                AC
                                 
                             | 
| 実行時間 | 12 ms / 2,000 ms | 
| コード長 | 698 bytes | 
| コンパイル時間 | 2,448 ms | 
| コンパイル使用メモリ | 208,284 KB | 
| 実行使用メモリ | 6,944 KB | 
| 最終ジャッジ日時 | 2024-06-22 13:32:32 | 
| 合計ジャッジ時間 | 3,913 ms | 
| ジャッジサーバーID (参考情報) | judge5 / judge3 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 2 | 
| other | AC * 42 | 
ソースコード
import std;
void main() {
    int N;
    readf("%d\n", N);
    int S = N.to!real.sqrt.floor.to!int;
    auto sieve = iota(0, N+1).map!(i => i == 2 || (i > 2 && i % 2 == 1)).array;
    foreach (i; iota(3, S+1, 2)) {
        if (!sieve[i]) {
            continue;
        }
        foreach (j; iota(i*i, N+1, i)) {
            sieve[j] = false;
        }
    }
    auto primes = iota(0, N+1).filter!(i => sieve[i]).array;
    int res;
    foreach (r; primes) {
        if (r > S + 1) {
            break;
        }
        int q = r * r - 2;
        if (q <= N && sieve[q]) {
            ++res;
            if (q != 2) {
                ++res;
            }
        }
    }
    res.writeln;
}
            
            
            
        