#define MD 998244353
ll@n,@p[n],q[];
fenwick<ll>f;f.malloc(n+1,1);
rep(i,n){
	q[i]=f.get(p[i]);
	f.add(p[i],1);
}
Comb<Mint>t;
Mint z;
rep(i,n){
	ll a=q[i],b=i-a,c=p[i]-1-a,d=n-1-a-b-c;
	z+=t.C(a+d,a)*t.C(b+c,b);
}
wt(z);