#define MD 998244353
ll@n,@k,a[2n],b=0;
Mint y=1,z;
rep(i,2n){
	ll@x;
	a[i]=x<<2|!(i&1);
}
sortA(2n,a);
rep[a](x,2n){
	if(x&1){
		z=z*k+y*b;
		y*=k-b;
		++b;
	}else{
		--b;
	}
}
wt(z);