#434706 (D) No.315 世界のなんとか3.5

• 問題: No.315 世界のなんとか3.5
• ユーザー: te-sh
• 提出日時: 2020-02-26 02:17:00
• 言語: D (dmd 2.109.1)
• 結果: CE (最新)
  AC
  (最初)
• 実行時間: -
• コード長: 8,730 bytes
• コンパイル時間: 461 ms
• コンパイル使用メモリ: 136,968 KB
• 最終ジャッジ日時: 2024-11-14 22:08:32
• 合計ジャッジ時間: 925 ms
• ジャッジサーバーID （参考情報）: judge3 / judge1

コンパイルメッセージ

Main.d(368): Deprecation: function `Main.IO!(makeGlobal, makeGlobal).IO.put!("{}", ModInt!(1000000007, false)).put.putMain!(c, ModInt!(1000000007, false)).putMain` function requires a dual-context, which is deprecated
Main.d-mixin-338(338):        instantiated from here: `putMain!(c, ModInt!(1000000007, false))`
Main.d(48):        instantiated from here: `put!("{}", ModInt!(1000000007, false))`
/home/linuxbrew/.linuxbrew/opt/dmd/include/dlang/dmd/std/format/internal/write.d(143): Error: cannot implicitly convert expression `obj` of type `const(ModInt!(1000000007, false))` to `int`
/home/linuxbrew/.linuxbrew/opt/dmd/include/dlang/dmd/std/format/write.d(1239): Error: template instance `std.format.internal.write.formatValueImpl!(LockingTextWriter, ModInt!(1000000007, false), char)` error instantiating
/home/linuxbrew/.linuxbrew/opt/dmd/include/dlang/dmd/std/format/write.d(632):        instantiated from here: `formatValue!(LockingTextWriter, ModInt!(1000000007, false), char)`
/home/linuxbrew/.linuxbrew/opt/dmd/include/dlang/dmd/std/stdio.d(1759):        instantiated from here: `formattedWrite!(LockingTextWriter, char, ModInt!(1000000007, false))`
Main.d(383):        instantiated from here: `write!(ModInt!(1000000007, false))`
Main.d(371):        ... (1 instantiations, -v to show) ...
Main.d-mixin-338(338):        instantiated from here: `putMain!(c, ModInt!(1000000007, false))`
Main.d(48):        instantiated from here: `put!("{}", ModInt!(1000000007, false))`

ソースコード

// URL: https://yukicoder.me/problems/no/315

import std.algorithm, std.array, std.bitmanip, std.container, std.conv, std.format,
       std.functional, std.math, std.range, std.traits, std.typecons, std.stdio, std.string;

version(unittest) {} else
void main()
{
  string A, B; int P; io.getV(A, B, P);

  auto calc(int[] n)
  {
    auto nl = cast(int)n.length;

    if (nl <= 5) {
      auto r = mint(0);
      foreach (i; 1..d2i(n)+1)
        if ((i%3 == 0 || include3(i)) && i%P != 0)
          ++r;
      return r;
    }

    auto dp = new mint[][][][](nl-4, 2, 3, 2);
    dp[0][1][0][0] = 1;
    foreach (i; 0..nl-5)
      foreach (j; 0..2) {
        auto d = j ? n[i] : 9;
        foreach (k; 0..3)
          foreach (l; 0..2)
            foreach (m; 0..d+1)
              dp[i+1][j && m==d][(k+m)%3][l || m==3] += dp[i][j][k][l];
      }

    auto dp2 = new mint[][][](3, 2, 2);
    foreach (j; 0..2) {
      auto d = j ? d2i(n.tail(5)) : 99999;
      foreach (k; 0..3)
        foreach (l; 0..2)
          foreach (m; 0..d+1)
            dp2[(k+m)%3][l || include3(m)][m%P == 0] += dp[nl-5][j][k][l];
    }

    return dp2[0][0][0] + dp2[0][1][0] + dp2[1][1][0] + dp2[2][1][0];
  }

  auto a = s2d(A), b = s2d(B), r = calc(b)-calc(a);
  if ((a.sum%3 == 0 || a.canFind(3)) && d2i(a.tail(5))%P != 0) ++r;
  io.put(r);
}

auto include3(int n)
{
  for (; n > 0; n /= 10)
    if (n%10 == 3) return true;
  return false;
}

auto s2d(string s)
{
  return s.map!(c => cast(int)(c-'0')).array;
}

auto d2i(int[] a)
{
  auto r = 0;
  foreach (ai; a) r = r*10+ai;
  return r;
}

const mod = 10^^9+7;
alias mint = ModInt!mod;
pure nothrow @safe
{
  T powr(alias pred = "a*b", T, U)(const T a, U n, T one)
    if (isIntegral!U)
  {
    auto b = T(a);
    alias predFun = binaryFun!pred;
    if (n == 0) return one;
    auto r = one;
    for (; n > 0; n >>= 1) {
      if (n&1) r = predFun(r, b);
      b = predFun(b, b);
    }
    return r;
  }
  T powr(alias pred = "a*b", T, U)(const T a, U n)
    if (isIntegral!U)
  {
    return powr!(pred, T, U)(a, n, T(1));
  }
}

pure nothrow @nogc @safe
{
  auto lowerBoundBy(alias conv = "a", alias comp = "a<b", R, T)(const R a, const T v)
  {
    return a.sortedTuple!(conv, comp).lowerBound(tuple(a.front, v)).map!"a[0]";
  }

  auto upperBoundBy(alias conv = "a", alias comp = "a<b", R, T)(const R a, const T v)
  {
    return a.sortedTuple!(conv, comp).upperBound(tuple(a.front, v)).map!"a[0]";
  }

  auto sortedTuple(alias conv = "a", alias comp = "a<b", R)(const R a)
  {
    alias convFun = unaryFun!conv, compFun = binaryFun!comp;
    return a.map!(e => tuple(e, convFun(e))).assumeSorted!((a, b) => compFun(a[1], b[1]));
  }
}

pure nothrow @nogc @safe
{
  pragma(inline, true)
  {
    T cdiv(T)(const T a, const T b)
    {
      return (a+b-1)/b;
    }
    T pmod(T)(const T a, const T b)
    {
      return a >= 0 ? a%b : a%b+b;
    }
  }

  ExtGcdResult!T extGcd(T)(const T a, const T b)
  {
    if (a == 0) {
      return ExtGcdResult!T(T(b), T(0), T(1));
    } else {
      auto r = extGcd(b%a, a);
      return ExtGcdResult!T(r.gcd, r.y-(b/a)*r.x, r.x);
    }
  }

  private struct ExtGcdResult(T)
  {
    T gcd, x, y;
  }
}

struct ModInt(int m, bool pos = false)
{
  pure nothrow @nogc @safe
  {
    @property int value() { return i; }
    @property void value(int v) { i = nm(v); }
    alias value this;

    this(T)(T v)
      if (isIntegral!T)
    {
      i = nm(v);
    }
    this(ref return scope const Mint v)
    {
      i = v.i;
    }
    ref Mint opAssign(T)(T v)
      if (isIntegral!T)
    {
      i = nm(v);
      return this;
    }
    ref Mint opAssign(const Mint v)
    {
      i = v.i;
      return this;
    }

    static if (!pos) {
      Mint opUnary(string op: "-")() const
      {
        return Mint(-i);
      }
    }

    static if (m < int.max / 2) {
      Mint opBinary(string op, T)(T r) const
        if ((op == "+" || (!pos && op == "-")) && isIntegral!T)
      {
        return Mint(mixin("i"~op~"r"));
      }
      ref Mint opOpAssign(string op, T)(T r)
        if ((op == "+" || (!pos && op == "-")) && isIntegral!T)
      {
        i = nm(mixin("i"~op~"r"));
        return this;
      }
      ref Mint opUnary(string op)()
        if (op == "++" || (!pos && op == "--"))
      {
        i = nm(mixin(op~"i"));
        return this;
      }
    } else {
      Mint opBinary(string op, T)(T r) const
        if ((op == "+" || (!pos && op == "-")) && isIntegral!T)
      {
        return Mint(mixin("l"~op~"r"));
      }
      ref Mint opOpAssign(string op, T)(T r)
        if ((op == "+" || (!pos && op == "-")) && isIntegral!T)
      {
        i = nm(mixin("l"~op~"r"));
        return this;
      }
      ref Mint opUnary(string op)()
        if (op == "++" || (!pos && op == "--"))
      {
        i = nm(mixin(op~"l"));
        return this;
      }
    }
    Mint opBinary(string op: "*", T)(T r) const
      if (isIntegral!T)
    {
      return Mint(l*r);
    }
    ref Mint opOpAssign(string op: "*", T)(T r)
      if (isIntegral!T)
    {
      i = nm(l*r);
      return this;
    }

    Mint opBinary(string op)(const Mint r) const
      if (op == "+" || !pos && op == "-" || op == "*")
    {
      return opBinary!op(r.i);
    }
    ref Mint opOpAssign(string op)(const Mint r)
      if (op == "+"|| !pos && op == "-" || op == "*")
    {
      return opOpAssign!op(r.i);
    }

    Mint opBinary(string op: "^^", T)(T n)
      if (isIntegral!T)
    {
      return powr(this, n, Mint(1));
    }

    static if (!pos) {
      Mint opBinary(string op: "/")(const Mint r) const
      {
        return Mint(l*r.inv.i);
      }
      ref Mint opOpAssign(string op: "/")(const Mint r)
      {
        i = nm(l*r.inv.i);
        return this;
      }

      Mint opBinary(string op: "/", T)(T r) const
        if (isIntegral!T)
      {
        return opBinary!op(Mint(r));
      }
      Mint opOpAssign(string op: "/", T)(T r)
        if (isIntegral!T)
      {
        return opOpAssign!op(Mint(r));
      }

      Mint inv() const
      {
        return Mint(extGcd(i, m).x);
      }
    }
  }

  private
  {
    alias Mint = ModInt!(m, pos);
    version(BigEndian) union { long l; struct { int i2; int i; } }
    else union { long l; int i; }

    pure nothrow @nogc @safe
    {
      int nm(T)(T v) const
        if (isIntegral!T)
      {
        static if (pos) return cast(int)(v%m);
        else return cast(int)pmod(v, m);
      }
    }
  }
}

auto io = IO!()();
import std.stdio;
struct IO(alias IN = stdin, alias OUT = stdout)
{
  import std.meta : allSatisfy;
  import core.stdc.stdlib : exit;

  void getV(T...)(ref T v)
  {
    foreach (ref w; v) get(w);
  }
  void getA(T)(size_t n, ref T v)
    if (hasAssignableElements!T)
  {
    v = new T(n);
    foreach (ref w; v) get(w);
  }
  void getC(T...)(size_t n, ref T v)
    if (allSatisfy!(hasAssignableElements, T))
  {
    foreach (ref w; v) w = new typeof(w)(n);
    foreach (i; 0..n) foreach (ref w; v) get(w[i]);
  }
  void getM(T)(size_t r, size_t c, ref T v)
    if (hasAssignableElements!T && hasAssignableElements!(ElementType!T))
  {
    v = new T(r);
    foreach (ref w; v) getA(c, w);
  }
  template getS(E...)
  {
    void getS(T)(size_t n, ref T v)
    {
      v = new T(n);
      foreach (ref w; v) foreach (e; E) mixin("get(w."~e~");");
    }
  }

  const struct PutConf
  {
    bool newline = true, flush, exit;
    string floatFormat = "%.10f", delimiter = " ";
  }

  void put(alias conf = "{}", T...)(T v)
  {
    mixin("const PutConf c = "~conf~"; putMain!c(v);");
  }
  void putB(alias conf = "{}", S, T)(bool c, S t, T f)
  {
    if (c) put!conf(t);
    else put!conf(f);
  }
  void putRaw(T...)(T v)
  {
    OUT.write(v);
    OUT.writeln;
  }

  private
  {
    dchar[] buf;
    auto sp = (new dchar[](0)).splitter;

    void nextLine()
    {
      IN.readln(buf);
      sp = buf.splitter;
    }
    void get(T)(ref T v)
    {
      if (sp.empty) nextLine();
      v = sp.front.to!T;
      sp.popFront();
    }

    void putMain(PutConf c, T...)(T v)
    {
      foreach (i, w; v) {
        putOne!c(w);
        if (i+1 < v.length) OUT.write(c.delimiter);
      }
      static if (c.newline) OUT.writeln;
      static if (c.flush) OUT.flush();
      static if (c.exit) exit(0);
    }
    void putOne(PutConf c, T)(T v)
    {
      static if (isInputRange!T && !isSomeString!T) putRange!c(v);
      else static if (isFloatingPoint!T) OUT.write(format(c.floatFormat, v));
      else static if (hasMember!(T, "fprint")) v.fprint(OUT);
      else OUT.write(v);
    }
    void putRange(PutConf c, T)(T v)
    {
      auto w = v;
      while (!w.empty) {
        putOne!c(w.front); w.popFront();
        if (!w.empty) OUT.write(c.delimiter);
      }
    }
  }
}