#include<bits/stdc++.h>
using namespace std;
typedef unsigned long long int ull;
typedef long long int ll;
typedef pair<ll,ll> pll;
typedef long double D;
typedef complex<D> P;
#define F first
#define S second
//const ll MOD=1000000007;
//const ll MOD=998244353;
const ll MOD=924844033;

template<typename T,typename U>istream & operator >> (istream &i,pair<T,U> &A){i>>A.F>>A.S; return i;}
template<typename T>istream & operator >> (istream &i,vector<T> &A){for(auto &I:A){i>>I;} return i;}
template<typename T,typename U>ostream & operator << (ostream &o,const pair<T,U> &A){o<<A.F<<" "<<A.S; return o;}
template<typename T>ostream & operator << (ostream &o,const vector<T> &A){ll i=A.size(); for(auto &I:A){o<<I<<(--i?" ":"");} return o;}


template<long long int mod=1000000007>
struct Mod_Int{
    typedef long long int ll;
    typedef pair<ll,ll> pll;
    typedef Mod_Int<mod> M;
    ll a;
    
    ll mod_pow(ll a,ll x){
        a%=mod;
        ll ans=1;
        for(int i=0;i<63;i++){
            if(x>>i&1){ans*=a; ans%=mod;}
            a*=a;
            a%=mod;
        }
        return ans;
    }
    
    pll Ex_gcd(ll a,ll b){
        if(b==0){return {1,0};}
        pll ret=Ex_gcd(b,a%b);
        ret.F-=a/b*ret.S;
        return {ret.S,ret.F};
    }
    
    ll prime_R(ll a){
        return mod_pow(a,mod-2);
    }
    
    ll R(ll a){
        ll ret=Ex_gcd(a,mod).F;
        ret%=mod;
        if(ret<0){ret+=mod;}
        return ret;
    }
    
    Mod_Int(ll A=1):a(A){
        a%=mod;
        if(a<0){a+=mod;}
    }
    
    Mod_Int(const M &b):a(b.a){}
    
    M & operator += (const M &b){
        a+=b.a;
        if(a>=mod){a-=mod;}
        return *this;
    }
    
    M operator + (const M &b) const {
        M c=*this;
        return c+=b;
    }
    
    M & operator -= (const M &b){
        a-=b.a;
        if(a<0){a+=mod;}
        return *this;
    }
    
    M operator - (const M &b) const {
        M c=*this;
        return c-=b;
    }
    
    M & operator *= (const M &b){
        (a*=b.a)%=mod;
        return *this;
    }
    
    M operator * (const M &b) const {
        M c=*this;
        return c*=b;
    }
    
    M & operator /= (const M &b){
        (a*=R(b.a))%=mod;
        return *this;
    }
    
    M operator / (const M &b) const {
        M c=*this;
        return c/=b;
    }
    
    M & mod_pow_equal(ll x){
        ll ans=1;
        while(x>0){
            if(x&1){ans*=a; ans%=mod;}
            a*=a;
            a%=mod;
            x>>=1;
        }
        a=ans;
        return *this;
    }
    
    M mod_pow(ll x){
        M c(a);
        return c.mod_pow_equal(x);
    }
    
    bool operator == (const M &b) const {return a==b.a;}
    
    bool operator != (const M &b) const {return a!=b.a;}
    
    bool operator <= (const M &b) const {return a<=b.a;}
    
    bool operator < (const M &b) const {return a<b.a;}
    
    bool operator > (const M &b) const {return a>b.a;}
    
    bool operator >= (const M &b) const {return a>=b.a;}
    
    M & operator = (const M &b){
        a=b.a;
        return *this;
    }
    
    M & operator = (const ll &b){
        (a=b)%=mod;
        if(a<0){a+=mod;}
        return *this;
    }
};

template<long long MOD>istream & operator >> (istream &i,Mod_Int<MOD> &A){ll a; cin>>a; A=Mod_Int<MOD>(a); return i;}
template<long long MOD>ostream & operator << (ostream &i,const Mod_Int<MOD> &A){i<<A.a; return i;}

using Int=Mod_Int<MOD>;

int main(){
  cin.tie(0);
  ios::sync_with_stdio(false);
  ll N,K;
  cin>>N>>K;
  vector<Int> dp1(N,0),nx1(N,0),dp2(N,0),nx2(N,0);
  dp1[0]=1;
  vector<Int> L1=dp1,L2;
  for(int i=2;i<=N;i++){
    for(auto &I:nx1){I=0;}
    for(auto &I:nx2){I=0;}
    for(int j=0;j<N;j++){
      nx1[j]+=dp1[j];
      nx1[j]+=dp2[j];
    }
    for(int j=1;j<N;j++){
      nx2[j]+=dp1[j-1];
    }
    swap(nx1,dp1);
    swap(nx2,dp2);
    if(i==N/K){
      L1=dp1;
      for(int j=0;j<N;j++){L1[j]+=dp2[j];}
    }
    if(i==N/K+1){
      L2=dp1;
      for(int j=0;j<N;j++){L2[j]+=dp2[j];}
    }
  }
  //cout<<L1<<endl<<L2<<endl;
  vector<Int> uku1(N+1,0);
  vector<Int> uku2(N+1,0);
  uku1[0]=1;
  for(int i=0;i<K;i++){
    for(auto &I:uku2){I=0;}
    ll len=(N+K-1-i)/K;
    auto &dp=len==N/K?L1:L2;
    //cout<<i<<" "<<len<<" "<<N/K<<endl;
    for(int j=0;j<=N;j++){
      for(int k=0;k<len && j+k<=N;k++){
        uku2[j+k]+=uku1[j]*dp[k];
      }
    }
    swap(uku2,uku1);
  }
  for(int i=0;i<K;i++){
    for(auto &I:uku2){I=0;}
    ll len=(N+K-1-i)/K;
    auto &dp=len==N/K?L1:L2;
    //cout<<i<<" "<<len<<" "<<N/K<<endl;
    for(int j=0;j<=N;j++){
      for(int k=0;k<len && j+k<=N;k++){
        uku2[j+k]+=uku1[j]*dp[k];
      }
    }
    swap(uku2,uku1);
  }
  //cout<<uku1<<endl;
  Int ans=0;
  Int fr=1;
  for(int i=N;i>=0;i--){
    int sg=i&1?-1:1;
    ans+=uku1[i]*sg*fr;
    fr*=N-i+1;
  }
  cout<<ans<<endl;


  return 0;
}


Measured memory_bytes: 384