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

//* ATCODER
#include<atcoder/all>
using namespace atcoder;
typedef modint998244353 mint;
//*/

/* BOOST MULTIPRECISION
#include<boost/multiprecision/cpp_int.hpp>
using namespace boost::multiprecision;
//*/

typedef long long ll;

#define rep(i, s, n) for (int i = (int)(s); i < (int)(n); i++)
#define rrep(i, s, n) for (int i = (int)(n)-1; i >= (int)(s); i--)

template <typename T> bool chmin(T &a, const T &b) {
	if (a <= b) return false;
	a = b;
	return true;
}

template <typename T> bool chmax(T &a, const T &b) {
	if (a >= b) return false;
	a = b;
	return true;
}

template <typename T> T max(vector<T> &a){
	assert(!a.empty());
	T ret = a[0];
	for (int i=0; i<(int)a.size(); i++) chmax(ret, a[i]);
	return ret;
}

template <typename T> T min(vector<T> &a){
	assert(!a.empty());
	T ret = a[0];
	for (int i=0; i<(int)a.size(); i++) chmin(ret, a[i]);
	return ret;
}

template <typename T> T sum(vector<T> &a){
	T ret = 0;
	for (int i=0; i<(int)a.size(); i++) ret += a[i];
	return ret;
}

//defmodfact
const int COMinitMAX = 4000000;
mint fact[COMinitMAX+1], factinv[COMinitMAX+1];

void modfact(){
	fact[0] = 1;
	for (int i=1; i<=COMinitMAX; i++){
		fact[i] = fact[i-1] * i;
	}
	factinv[COMinitMAX] = fact[COMinitMAX].inv();
	for (int i=COMinitMAX-1; i>=0; i--){
		factinv[i] = factinv[i+1] * (i+1);
	}
}

mint cmb(int a, int b){
	if (a<b || b<0) return mint(0);
	return fact[a]*factinv[b]*factinv[a-b];
}
//--------


vector<mint> poly_inv(vector<mint> &a, int M = -314159265){
	if (M == -314159265) M = (int)a.size();
	else if (M <= 0) return {};
	int n = a.size();
	mint r = a[0].pow((ll)(mint::mod())-2);
	int m = 1;
	vector<mint> res = {r};
	while (m < M){
		vector<mint> f = a;
		f.resize(2 * m);
		vector<mint> g = res;
		g.resize(2 * m);
		internal::butterfly(f);
		internal::butterfly(g);
		for (int i=0; i<2*m; i++){
			f[i] = f[i] * g[i];
		}
		internal::butterfly_inv(f);
		for (int i=0; i<m; i++){
			f[i] = f[i + m];
		}
		for (int i=0; i<m; i++){
			f[i + m] = 0;
		}
		internal::butterfly(f);
		for (int i=0; i<2*m; i++){
			f[i] = f[i] * g[i];
		}
		internal::butterfly_inv(f);
		mint iz = mint(2*m).inv();
		iz = -iz * iz;
		for (int i=0; i<m; i++){
			f[i] = f[i] * iz;
		}
		res.insert(res.end(), f.begin(), f.begin()+m);
		m <<= 1;
	}
	res.resize(M);
	return res;
}


vector<mint> poly_log(vector<mint> &a, int M = -314159265){
	if (M == -314159265) M = (int)a.size();
	else if (M <= 0) return {};
	int n = a.size();
	if (n == 1) return vector<mint>(M, 0);
	vector<mint> b(n-1);
	for (int i=0; i<n-1; i++){
		b[i] = a[i+1] * (i+1);
	}
	vector<mint> t = convolution<mint>(b, poly_inv(a, M));
	vector<mint> ret(M);
	for (int i=0; i<M-1; i++){
		ret[i+1] = t[i] * factinv[i+1] * fact[i];
	}
	return ret;
}


vector<mint> poly_exp(vector<mint> &a, int M = -314159265){
	if (M == -314159265) M = (int)a.size();
	else if (M <= 0) return {};
	int n = a.size();
	int m = 1;
	vector<mint> res = {1};
	while (m < M){
		vector<mint> f(2*m);
		for (int i=0; i<min(n, 2*m); i++) f[i] = a[i];
		vector<mint> v = poly_log(res, 2*m);
		vector<mint> w(2*m);
		for (int i=0; i<2*m; i++) w[i] = f[i] - v[i];
		w[0] += 1;
		vector<mint> g = convolution<mint>(res, w);
		res.insert(res.end(), g.begin()+m, g.begin()+2*m);
		m <<= 1;
	}
	res.resize(M);
	return res;
}


vector<mint> poly_pow_nonzero(vector<mint> &a, ll m, ll l){
	int n = a.size();
	mint bais = a[0].pow(m);
	mint invs;
	if (a[0].val() == 0) invs = 0;
	else invs = a[0].inv();
	vector<mint> r(n);
	for (int i=0; i<n; i++) r[i] = a[i] * invs;
	r = poly_log(r, l);
	for (int i=0; i<l; i++) r[i] = r[i] * m;
	r = poly_exp(r, l);
	for (int i=0; i<l; i++) r[i] = r[i] * bais;
	return r;
}


vector<mint> poly_pow(vector<mint> &a, ll m, ll l){
	int n = a.size();
	int ind = 0;
	for (int i=0; i<n; i++){
		if (a[i].val() != 0){
			ind = i;
			break;
		}
	}
	ll g = min(m, (ll)3141592653);
	if (g*ind >= l){
		return vector<mint>(l, 0);
	}
	vector<mint> ret(g*ind);
	vector<mint> b(n-ind);
	for (int i=0; i<n-ind; i++) b[i] = a[i+ind];
	vector<mint> tmp;
	if (l-g*ind > 0) tmp = poly_pow_nonzero(b, m, l-g*ind);
	else tmp = {};
	ret.insert(ret.end(), tmp.begin(), tmp.end());
	return ret;
}


int main(){
	modfact();
	int n, k; cin >> n >> k;
	vector<mint> g(10);
	rep(i,0,10){
		g[i] = 1;
	}
	vector<mint> f1 = poly_pow(g, n/2, 500001);
	vector<mint> f2 = poly_pow(g, (n+1)/2, 500001);
	
	vector<vector<mint>> v1(11, vector<mint>(500001));
	vector<vector<mint>> v2(11, vector<mint>(500001));
	rep(i,0,500001){
		v1[(10*i)%11][i] = f1[i];
		v2[i%11][i] = f1[i];
	}

	vector<mint> tmp(1000001);
	rep(j,0,11){
		vector<mint> v = convolution(v1[j], v2[(11-j)%11]);
		rep(i,0,1000001){
			tmp[i] += v[i];
		}
	}
	mint ans = 0;
	for (int i=1; i<(int)tmp.size(); i++){
		if (i % 9 == 0){
			ans += mint(i).pow(k) * tmp[i];
		}
	}
	
	cout << ans.val() << '\n';


}