#define MD 998244353
int a[2d5],c[2d5];
{
	fenwick<Mint>f1,f2,g1,g2;
	f1.walloc(2d5,1);
	f2.walloc(2d5,1);
	g1.walloc(2d5,1);
	g2.walloc(2d5,1);
	Mint sum=0;
	ll @n;
	rd(a(n));
	coordcomp(n,a,c);
	rep(i,n){
		sum+=a[i]*g2.range(c[i]+1,2d5-1)+f2.range(c[i]+1,2d5-1);
		g2.add(c[i],g1.range(c[i]+1,2d5-1));
		g1.add(c[i],1);
		f2.add(c[i],a[i]*g1.range(c[i]+1,2d5-1)+f1.range(c[i]+1,2d5-1));
		f1.add(c[i],a[i]);
	}
	wt(sum);
}