#define MD 998244353
Comb<Mint>c;
ll@n,@p;
Mint z;
rep(i,n/p+1){
	z+=c.fac(n)/(c.fac(n-i*p)*c.fac(i)*Mint(p)**i);
}
wt(c.fac(n)-z);