#include <iostream>
#include <vector>
#include <map>
#include <set>
#include <stack>
#include <queue>
#include <algorithm>
#include <cassert>
#include <random>
#include <iomanip>
#include <bitset>
#define FOR(i, n, m) for(ll i = n; i < (int)m; i++)
#define REP(i, n) FOR(i, 0, n)
#define ALL(v) v.begin(), v.end()
#define pb push_back
using namespace std;
using ll = long long;
using P = pair<ll, ll>;
constexpr ll inf = 1000000000;
constexpr ll mod = 1000000007;
constexpr long double eps = 1e-15;
 
template<typename T1, typename T2>
ostream& operator<<(ostream& os, pair<T1, T2> p) {
    os << to_string(p.first) << " " << to_string(p.second);
    return os;
}
template<typename T>
ostream& operator<<(ostream& os, vector<T>& v) {
    REP(i, v.size()) {
        if(i) os << " ";
        os << to_string(v[i]);
    }
    return os;
}
 
struct modint {
    ll n;
public:
    modint(const ll n = 0) : n((n % mod + mod) % mod) {}
    static modint pow(modint a, int m) {
        modint r = 1;
        while(m > 0) {
            if(m & 1) { r *= a; }
            a = (a * a); m /= 2;
        }
        return r;
    }
    modint &operator++() { *this += 1; return *this; }
    modint &operator--() { *this -= 1; return *this; }
    modint operator++(int) { modint ret = *this; *this += 1; return ret; }
    modint operator--(int) { modint ret = *this; *this -= 1; return ret; }
    modint operator~() const { return (this -> pow(n, mod - 2)); } // inverse
    friend bool operator==(const modint& lhs, const modint& rhs) {
        return lhs.n == rhs.n;
    }
    friend bool operator<(const modint& lhs, const modint& rhs) {
        return lhs.n < rhs.n;
    }
    friend bool operator>(const modint& lhs, const modint& rhs) {
        return lhs.n > rhs.n;
    }
    friend modint &operator+=(modint& lhs, const modint& rhs) {
        lhs.n += rhs.n;
        if (lhs.n >= mod) lhs.n -= mod;
        return lhs;
    }
    friend modint &operator-=(modint& lhs, const modint& rhs) {
        lhs.n -= rhs.n;
        if (lhs.n < 0) lhs.n += mod;
        return lhs;
    }
    friend modint &operator*=(modint& lhs, const modint& rhs) {
        lhs.n = (lhs.n * rhs.n) % mod;
        return lhs;
    }
    friend modint &operator/=(modint& lhs, const modint& rhs) {
        lhs.n = (lhs.n * (~rhs).n) % mod;
        return lhs;
    }
    friend modint operator+(const modint& lhs, const modint& rhs) {
        return modint(lhs.n + rhs.n);
    }
    friend modint operator-(const modint& lhs, const modint& rhs) {
        return modint(lhs.n - rhs.n);
    }
    friend modint operator*(const modint& lhs, const modint& rhs) {
        return modint(lhs.n * rhs.n);
    }
    friend modint operator/(const modint& lhs, const modint& rhs) {
        return modint(lhs.n * (~rhs).n);
    }
};
istream& operator>>(istream& is, modint m) { is >> m.n; return is; }
ostream& operator<<(ostream& os, modint m) { os << m.n; return os; }
 
#define MAX_N 3030303
long long extgcd(long long a, long long b, long long& x, long long& y) {
    long long d = a;
    if (b != 0) {
        d = extgcd(b, a % b, y, x);
        y -= (a / b) * x;
    } else {
        x = 1; y = 0;
    }
    return d;
}
long long mod_inverse(long long a, long long m) {
    long long x, y;
    if(extgcd(a, m, x, y) == 1) return (m + x % m) % m;
    else return -1;
}
vector<long long> fact(MAX_N+1, inf);
long long mod_fact(long long n, long long& e) {
    if(fact[0] == inf) {
        fact[0]=1;
        if(MAX_N != 0) fact[1]=1;
        for(ll i = 2; i <= MAX_N; ++i) {
            fact[i] = (fact[i-1] * i) % mod;
        }
    }
    e = 0;
    if(n == 0) return 1;
    long long res = mod_fact(n / mod, e);
    e += n / mod;
    if((n / mod) % 2 != 0) return (res * (mod - fact[n % mod])) % mod;
    return (res * fact[n % mod]) % mod;
}
// return nCk
long long mod_comb(long long n, long long k) {
    if(n < 0 || k < 0 || n < k) return 0;
    long long e1, e2, e3;
    long long a1 = mod_fact(n, e1), a2 = mod_fact(k, e2), a3 = mod_fact(n - k, e3);
    if(e1 > e2 + e3) return 0;
    return (a1 * mod_inverse((a2 * a3) % mod, mod)) % mod;
}
 
using mi = modint;
 
mi mod_pow(mi a, ll n) {
    mi ret = 1;
    mi tmp = a;
    while(n > 0) {
        if(n % 2) ret *= tmp;
        tmp = tmp * tmp;
        n /= 2;
    }
    return ret;
}
 
ll gcd(ll a, ll b) {
    if (b == 0) return a;
    return gcd(b, a % b);
}

vector<int> kmp(string s) {
    int n = (int)s.size();
    vector<int> ret(n, 0);
    REP(i, n - 1) {
        int j = ret[i];
        while(1) {
            if(j == 0) {
                if(s[i + 1] == s[0]) ret[i + 1] = 1;
                else ret[i + 1] = 0;
                break;
            }
            if(s[j] == s[i + 1]) {
                ret[i + 1] = j + 1;
                break;
            } else {
                j = ret[j - 1];
            }
        }
    }
    return ret;
}

vector<ll> solve(string ss, ll m) {
    string s = ss.substr(0, (int)ss.size() / 2);
    ll n = (int)s.size();
    vector<ll> ret(26, 0);
    vector<int> v = kmp(s);
    ll peri = n - v[n - 1];
    string s0 = s.substr(0, peri);
    if(n % peri == 0) {
        ll a = m / peri, b = m % peri;
        REP(i, peri) {
            ret[s0[i] - 'a'] += a;
            if(i < b) ret[s0[i] - 'a']++;
        }
    } else {
        if(m <= 2 * n) {
            REP(i, m) ret[ss[i] - 'a']++;
            return ret;
        }
        vector<ll> l(101, 0);
        vector<vector<ll>> c(101, vector<ll>(26, 0));
        l[0] = s0.size(); REP(i, l[0]) c[0][s0[i] - 'a']++;
        l[1] = s.size(); REP(i, l[1]) c[1][s[i] - 'a']++;
        FOR(i, 2, 100) {
            l[i] = l[i - 1] + l[i - 2];
            REP(j, 26) c[i][j] = c[i - 1][j] + c[i - 2][j];
            if(l[i] * 2 >= m) {
                REP(j, 26) ret[j] += c[i][j];
                ll rem = m - l[i];
                for(ll j = i; j >= 0; j--) {
                    if(j == 0) {
                        REP(k, rem) ret[s0[k] - 'a']++;
                        break;
                    } else if(j == 1) {
                        REP(k, rem) ret[s[k] - 'a']++;
                        break;
                    }
                    if(rem <= l[j - 1]) continue;
                    rem -= l[j - 1];
                    REP(k, 26) ret[k] += c[j - 1][k];
                    j--;
                }
                break;
            }
        }
    }
    return ret;
}

int main() {
    ios::sync_with_stdio(false);
    cin.tie(0);
    string s;
    cin >> s;
    ll l, r;
    cin >> l >> r;
    vector<ll> ans = solve(s, r);
    if(l) {
        vector<ll> tmp = solve(s, l - 1);
        REP(i, 26) ans[i] -= tmp[i];
    }
    cout << ans << endl;
    return 0;
}


Measured memory_bytes: 24724