#include using namespace std; using ll=long long; const ll ILL=2167167167167167167; const int INF=2100000000; #define rep(i,a,b) for (int i=(int)(a);i<(int)(b);i++) #define all(p) p.begin(),p.end() template using pq_ = priority_queue, greater>; template int LB(vector &v,T a){return lower_bound(v.begin(),v.end(),a)-v.begin();} template int UB(vector &v,T a){return upper_bound(v.begin(),v.end(),a)-v.begin();} template bool chmin(T &a,T b){if(b bool chmax(T &a,T b){if(a void So(vector &v) {sort(v.begin(),v.end());} template void Sore(vector &v) {sort(v.begin(),v.end(),[](T x,T y){return x>y;});} bool yneos(bool a,bool upp=false){if(a){cout<<(upp?"YES\n":"Yes\n");}else{cout<<(upp?"NO\n":"No\n");}return a;} template void vec_out(vector &p,int ty=0){ if(ty==2){cout<<'{';for(int i=0;i<(int)p.size();i++){if(i){cout<<",";}cout<<'"'< T vec_min(vector &a){assert(!a.empty());T ans=a[0];for(auto &x:a) chmin(ans,x);return ans;} template T vec_max(vector &a){assert(!a.empty());T ans=a[0];for(auto &x:a) chmax(ans,x);return ans;} template T vec_sum(vector &a){T ans=T(0);for(auto &x:a) ans+=x;return ans;} int pop_count(long long a){int res=0;while(a){res+=(int)(a&1),a>>=1;}return res;} template T square(T a){return a * a;} #include using mint = atcoder::modint998244353; const int D = 21; using F = array, D>; F op(F l, F r) { F res; rep(i, 0, D) rep(j, 0, D) { res[i][j] = {0}; } rep(i, 0, D) rep(j, 0, D) rep(k, 0, D) { res[i][k] += l[i][j] * r[j][k]; } return res; } F my_pow(F l, ll times) { F res; rep(i, 0, D) rep(j, 0, D) res[i][j] = (i == j ? 1 : 0); while (times) { if (times & 1) { res = op(res, l); } l = op(l, l); times /= 2; } return res; } void solve(); // DEAR MYSTERIES / TOMOO int main() { ios::sync_with_stdio(false); cin.tie(nullptr); int t = 1; // cin >> t; rep(i, 0, t) solve(); } void solve(){ string N; cin >> N; ll K; cin >> K; F p; rep(i, 0, D) { array tmp; mint sumC = 0, sumS = 0; vector seen(10); tmp[i] = 1; if (i == D - 1){} else if (i & 1) sumS = 1; else sumC = 1; for (auto c : N) { int a = c - '0'; seen[a]++; mint sumC2 = sumC; mint sumS2 = sumS * 10 + sumC * a; sumC2 -= tmp[a * 2]; sumS2 -= tmp[a * 2 + 1]; if (a) { sumC2 += tmp[D - 1]; sumS2 += tmp[D - 1] * a; } sumC += sumC2; sumS += sumS2; tmp[a * 2] += sumC2; tmp[a * 2 + 1] += sumS2; /*if (a != 0 && rp == 0 && seen[a] == 1) { sumC += tmp[D - 1]; sumS += tmp[D - 1] * a; tmp[a * 2] += tmp[D - 1]; tmp[a * 2 + 1] += tmp[D - 1] * a; }*/ } rep(j, 0, D) p[i][j] = tmp[j]; } auto dp = my_pow(p, K); mint ans = 0; rep(i, 0, 10) ans += dp[D - 1][i * 2 + 1]; cout << ans.val() << "\n"; } /* * 末尾が x の部分列の数と総和をもつ * x が来たとき、他全てをたし、 * dp[x] を引く */