#include <iostream>

using namespace std;
using ll = long long;
const int MX = 200010;
ll f[MX],inv[MX],fi[MX];
constexpr ll mod = 998244353;
void solve(){
    inv[1] = 1;
    for(int i=2;i<MX;i++){
        inv[i] = mod - (mod/i)*inv[mod%i]%mod;
    }
    f[0] = fi[0] = 1;
    for(int i=1;i<MX;i++){
        f[i] = f[i-1]*i%mod;
        fi[i] = fi[i-1]*inv[i]%mod;
    }
}

ll nck(ll n, ll k){
    if(n<0 || k<0 || n<k) return 0;
    return f[n]*fi[k]%mod*fi[n-k]%mod;
}

ll pw(ll a,ll x){
    ll ret = 1;
    while(x){
        if(x&1) (ret *= a) %= mod;
        (a *= a) %= mod; x /= 2;
    }
    return ret;
}

int main(){
    int i,n,k; cin >> n >> k;
    solve();
    if(k==0){
        cout << 1 << endl;
        return 0;
    }
    if(k==1){
        if(n&1) cout << n - 2 << endl;
        else cout << 2 << endl;
        return 0;
    }
    ll ans = 0;
    if(n&1){
        for(i=1;i<n;i+=2){
            (ans += max(n - i - 1,0)*nck(i,k - 2)) %= mod;
        }
    }else{
        for(i=0;i<n;i+=2){
            (ans += max(n - i - 1,0)*nck(i,k - 2)) %= mod;
        }
    }
    cout << ans << endl;
}