結果

問題 No.493 とても長い数列と文字列(Long Long Sequence and a String）
ユーザー nebukuro09nebukuro09
提出日時 2018-05-21 13:30:27
言語 D
(dmd 2.106.1)
結果
WA  
実行時間 -
コード長 1,918 bytes
コンパイル時間 810 ms
コンパイル使用メモリ 112,512 KB
実行使用メモリ 4,568 KB
最終ジャッジ日時 2023-09-03 20:13:46
合計ジャッジ時間 5,533 ms
ジャッジサーバーID
（参考情報） 		judge15 / judge13
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 2 ms
4,376 KB
testcase_01 AC 2 ms
4,380 KB
testcase_02 AC 2 ms
4,380 KB
testcase_03 AC 1 ms
4,380 KB
testcase_04 AC 1 ms
4,376 KB
testcase_05 AC 1 ms
4,380 KB
testcase_06 AC 2 ms
4,376 KB
testcase_07 AC 2 ms
4,376 KB
testcase_08 AC 1 ms
4,376 KB
testcase_09 AC 1 ms
4,376 KB
testcase_10 AC 1 ms
4,380 KB
testcase_11 AC 2 ms
4,376 KB
testcase_12 AC 2 ms
4,380 KB
testcase_13 AC 1 ms
4,376 KB
testcase_14 AC 1 ms
4,376 KB
testcase_15 AC 1 ms
4,376 KB
testcase_16 AC 1 ms
4,376 KB
testcase_17 AC 2 ms
4,376 KB
testcase_18 AC 1 ms
4,380 KB
testcase_19 AC 1 ms
4,380 KB
testcase_20 AC 2 ms
4,380 KB
testcase_21 AC 1 ms
4,376 KB
testcase_22 AC 2 ms
4,376 KB
testcase_23 AC 1 ms
4,376 KB
testcase_24 AC 2 ms
4,376 KB
testcase_25 AC 1 ms
4,376 KB
testcase_26 AC 1 ms
4,376 KB
testcase_27 AC 2 ms
4,380 KB
testcase_28 AC 2 ms
4,376 KB
testcase_29 AC 1 ms
4,376 KB
testcase_30 AC 2 ms
4,380 KB
testcase_31 AC 1 ms
4,380 KB
testcase_32 AC 1 ms
4,376 KB
testcase_33 AC 1 ms
4,380 KB
testcase_34 AC 1 ms
4,380 KB
testcase_35 AC 1 ms
4,380 KB
testcase_36 AC 1 ms
4,376 KB
testcase_37 AC 2 ms
4,380 KB
testcase_38 AC 1 ms
4,376 KB
testcase_39 AC 2 ms
4,380 KB
testcase_40 AC 2 ms
4,376 KB
testcase_41 AC 2 ms
4,380 KB
testcase_42 AC 1 ms
4,568 KB
testcase_43 AC 1 ms
4,380 KB
testcase_44 AC 1 ms
4,376 KB
testcase_45 AC 1 ms
4,376 KB
testcase_46 AC 2 ms
4,376 KB
testcase_47 AC 2 ms
4,376 KB
testcase_48 AC 2 ms
4,376 KB
testcase_49 AC 1 ms
4,380 KB
testcase_50 AC 1 ms
4,380 KB
testcase_51 AC 2 ms
4,376 KB
testcase_52 AC 2 ms
4,380 KB
testcase_53 AC 2 ms
4,380 KB
testcase_54 AC 2 ms
4,376 KB
testcase_55 AC 2 ms
4,380 KB
testcase_56 AC 1 ms
4,380 KB
testcase_57 AC 1 ms
4,380 KB
testcase_58 AC 1 ms
4,380 KB
testcase_59 WA -
testcase_60 WA -
testcase_61 WA -
testcase_62 WA -
testcase_63 WA -
testcase_64 WA -
testcase_65 WA -
testcase_66 WA -
testcase_67 WA -
testcase_68 WA -
testcase_69 WA -
testcase_70 WA -
testcase_71 WA -
testcase_72 WA -
testcase_73 WA -
testcase_74 WA -
testcase_75 WA -
testcase_76 WA -
testcase_77 WA -
testcase_78 WA -
testcase_79 WA -
testcase_80 WA -
testcase_81 WA -
testcase_82 WA -
testcase_83 WA -
testcase_84 WA -
testcase_85 WA -
testcase_86 WA -
testcase_87 WA -
testcase_88 WA -
testcase_89 WA -
testcase_90 WA -
testcase_91 WA -
testcase_92 WA -
testcase_93 WA -
testcase_94 WA -
testcase_95 WA -
testcase_96 WA -
testcase_97 WA -
testcase_98 WA -
testcase_99 WA -
testcase_100 WA -
testcase_101 WA -
testcase_102 WA -
testcase_103 WA -
testcase_104 WA -
testcase_105 WA -
testcase_106 WA -
testcase_107 WA -
testcase_108 WA -
testcase_109 WA -
testcase_110 WA -
testcase_111 WA -
testcase_112 WA -
testcase_113 WA -
testcase_114 AC 1 ms
4,376 KB
testcase_115 AC 1 ms
4,380 KB
testcase_116 AC 1 ms
4,376 KB
testcase_117 AC 1 ms
4,376 KB
testcase_118 AC 2 ms
4,376 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

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, std.bitmanip;

void main() {
    immutable long MOD = 10^^9 + 7;
    immutable int MAX = 63;
    
    auto s = readln.split.map!(to!long);
    auto K = s[0];
    auto L = s[1];
    auto R = s[2];

    auto len = new long[](MAX);
    auto sm = new long[](MAX);
    auto pr = new long[](MAX);
    auto sq = new long[][](MAX);
    pr[0] = 1;

    foreach (i; 1..MAX) {
        len[i] = len[i-1] * 2 + (i*i).to!string.length.to!long;
        sq[i] = (i*i).to!string.map!(c => c == '0' ? 10L : (c - '0').to!long).array;
        sm[i] = (sm[i-1] * 2 % MOD + sq[i].sum) % MOD;
        pr[i] = 1;
        foreach (a; sq[i]) pr[i] = pr[i] * a % MOD;
        pr[i] = pr[i] * pr[i-1] % MOD * pr[i-1] % MOD;
    }

    if (K < MAX && len[K.to!int] < R) {
        writeln(-1);
        return;
    }

    Tuple!(long, long) dfs(int n, long k) {
        if (n == 0 || k == 0) return tuple(0L, 1L);
        if (len[n-1] >= k) return dfs(n-1, k);
        if (len[n] < k) return tuple(sm[n], pr[n]);
        k -= len[n-1];
        long s = sm[n-1];
        long p = pr[n-1];
        foreach (d; sq[n]) {
            s = (s + d) % MOD;
            p = (p * d) % MOD;
            k -= 1;
            if (k == 0) break;
        }
        auto tmp = dfs(n-1, k);
        s = (s + tmp[0]) % MOD;
        p = (p * tmp[1]) % MOD;
        return tuple(s, p);
    }

    auto ans_r = dfs(MAX-1, R);
    auto ans_l = dfs(MAX-1, L-1);
    auto ans_s = ((ans_r[0] - ans_l[0]) % MOD + MOD) % MOD;
    auto ans_p = ans_r[1] * powmod(ans_l[1], MOD-2, MOD) % MOD;

    writeln(ans_s, " ", ans_p);
}

long powmod(long a, long x, long m) {
    long ret = 1;
    while (x) {
        if (x % 2) ret = ret * a % m;
        a = a * a % m;
        x /= 2;
    }
    return ret;
}
0