#include <bits/stdc++.h>
using namespace std;

#define TRACE(x) x
#define WATCH(x) TRACE(cout << #x" = " << x << endl)
#define WATCHR(a, b) TRACE(for (auto it=a; it!=b;) cout << *(it++) << " "; cout << endl)
#define WATCHC(V) TRACE({cout << #V" = "; WATCHR(V.begin(), V.end());})

#define sz(x) int((x).size())
#define all(x) (x).begin(), (x).end()

using ll = long long;
using vi = vector<int>;
using vvi = vector<vi>;
using vll = vector<ll>;
using vvll = vector<vll>;
using vb = vector<bool>;
using vs = vector<string>;

mt19937_64 rng(chrono::steady_clock::now().time_since_epoch().count());

template<int MOD> struct modnum {
    int v;
    modnum() : v(0) {}
    modnum(ll _v) : v(_v % MOD) { if (v < 0) v += MOD; }
    explicit operator int() const { return v; }
    friend istream& operator >> (istream& i, modnum& n) { ll v; i >> v; n = modnum(v); return i; }
    friend ostream& operator << (ostream& o, const modnum& n) { return o << n.v; }

    friend bool operator == (const modnum& a, const modnum& b) { return a.v == b.v; }
    friend bool operator != (const modnum& a, const modnum& b) { return a.v != b.v; }

    modnum& operator += (const modnum& o) { v += o.v; if (v >= MOD) v -= MOD; return *this; }
    modnum& operator -= (const modnum& o) { v -= o.v; if (v < 0) v += MOD; return *this; }
    modnum& operator *= (const modnum& o) { v = int(ll(v) * ll(o.v) % MOD); return *this; }
    modnum operator - () { modnum res; if (v) res.v = MOD - v; return res; }
    friend modnum operator + (const modnum& a, const modnum& b) { return modnum(a) += b; }
    friend modnum operator - (const modnum& a, const modnum& b) { return modnum(a) -= b; }
    friend modnum operator * (const modnum& a, const modnum& b) { return modnum(a) *= b; }

    modnum pow(ll e) const {
        if (e == 0) return 1;
        if (e & 1) return *this * this->pow(e-1);
        return (*this * *this).pow(e/2);
    }

    modnum inv() const {
        int g = MOD, x = 0, y = 1;
        for (int r = v; r != 0; ) {
            int q = g / r;
            g %= r; swap(g, r);
            x -= q * y; swap(x, y);
        }

        assert(g == 1);
        assert(y == MOD || y == -MOD);
        return x < 0 ? x + MOD : x;
    }
    modnum& operator /= (const modnum& o) { return (*this) *= o.inv(); }
    friend modnum operator / (const modnum& a, const modnum& b) { return modnum(a) /= modnum(b); }

    static int totient() {
        int tot = MOD, tmp = MOD;
        for (int p = 2; p * p <= tmp; p++) if (tmp % p == 0) {
            tot = tot / p * (p - 1);
            while (tmp % p == 0) tmp /= p;
        }
        if (tmp > 1) tot = tot / tmp * (tmp - 1);
        return tot;
    }

    static int primitive_root() {
        if (MOD == 1) return 0;
        if (MOD == 2) return 1;

        int tot = totient(), tmp = tot;
        vi tot_pr;
        for (int p = 2; p * p <= tmp; p++) if (tot % p == 0) {
            tot_pr.push_back(p);
            while (tmp % p == 0) tmp /= p;
        }
        if (tmp > 1) tot_pr.push_back(tmp);

        for (int r = 2; r < MOD; r++) if (__gcd(r, MOD) == 1) {
            bool root = true;
            for (int p : tot_pr) root &= modnum(r).pow(tot / p) != 1;
            if (root) return r;
        }
        assert(false);
    }

    static modnum generator() { static modnum g = primitive_root(); return g; }
    static int discrete_log(modnum v) {
        static const int M = ceil(sqrt(MOD));
        static unordered_map<int, int> table;
        if (table.empty()) {
            modnum e = 1;
            for (int i = 0; i < M; i++) { table[e.v] = i; e *= generator(); }
        }
        static modnum f = generator().pow(totient() - M);

        for (int i = 0; i < M; i++) {
            if (table.count(v.v)) return table[v.v] + i * M;
            v *= f;
        }
        assert(false);
    }

    static modnum fact(int n) {
        static vector<modnum<MOD>> fact = { 1 };
        while (fact.size() <= n)
            fact.push_back(fact.back() * fact.size());
        return fact[n];
    }

    static modnum ncr(int n, int r) {
        if (r < 0 || n < r) return 0;
        return fact(n) / (fact(r) * fact(n - r));
    }
};
using mn = modnum<int(1e9 + 7)>;
using vmn = vector<mn>;

int main() {
    ios_base::sync_with_stdio(false);
    cin.tie(0), cout.tie(0);

    mn ans = 0;

    int S;
    cin >> S;

    vmn dct(9);
    dct[1] = 9;
    for (int d = 2; d < 9; d++)
        dct[d] = dct[d-1] * 10;
    auto avail = [&dct](int d) { return d >= 9 ? INT_MAX / 10 : dct[d].v; };

    mn cdc = 9;
    vi good(10);

    for (int ld = 1; ld <= S; ld++) {
        if (S % ld == 0 && avail(ld) >= S / ld)
            ans += cdc - S / ld + 1;

        int betw = 0;
        for (int rd = ld + 1; betw < S; rd++) {
            // count A in [1, dct[ld]] and B in [1, dct[rd]] s.t. A * ld + B * rd + betw == S

            if (rd >= 10) {
                assert(rd == ld + 1);
                // ld divides S - betw - B, or: B = S - betw (ld)
                int bmin = max(1, ld < 9 ? (S - betw - ld * avail(ld) + rd - 1) / rd : 0);
                int bmax = min(avail(rd), (S - betw - ld) / rd) + 1;
                int rem = (S - betw) % ld;
                if (bmin < bmax) ans += (bmax + ld - rem - 1) / ld - (bmin + ld - rem - 1) / ld;
            } else {
                int amin = max(1, rd < 9 ? (S - betw - rd * avail(rd) + ld - 1) / ld : 0);
                int amax = min(avail(ld), (S - betw - rd) / ld) + 1;

                int tg = 0;
                for (int m = 0; m < rd; m++) {
                    good[m] = ((ld * m + betw - S) % rd) == 0;
                    tg += good[m];
                }

                while (amin < amax && amin % rd != 0) {
                    ans += good[amin % rd];
                    amin++;
                }
                while (amin < amax && amax % rd != 0) {
                    amax--;
                    ans += good[amax % rd];
                }
                if (amin < amax) ans += (amax - amin) / rd * tg;
            }

            if (rd >= 9) break;
            betw += rd * dct[rd].v;
        }

        cdc *= 10;
    }

    cout << ans << endl;

    return 0;
}



Measured memory_bytes: 256