#include<iostream>
#include<cstdio>
#include<algorithm>
#include<cstring>
#include<map>
#include<vector>
#include<queue>
using namespace std;

#define LL long long
#define DB double
#define MAXN 600000
#define MOD 998244353
#define G 3
#define Pr pair<LL,int>
#define X first
#define Y second
#define INF 1000000000000000000
#define mem(x,v) memset(x,v,sizeof(x))

LL read(){
  LL x=0,F=1;char c=getchar();
  while(c<'0'||c>'9'){if(c=='-')F=-1;c=getchar();}
  while(c>='0'&&c<='9'){x=(x*10+c-'0')%MOD;c=getchar();}
  return x*F;
}
int add(int a,int b){return (a+b>=MOD)?a+b-MOD:a+b;}
int dec(int a,int b){return (a-b<0)?a-b+MOD:a-b;}
int mul(int a,int b){return (1LL*a*b)%MOD;}
int fst_pow(int a,LL b){
  int res=1;
  while(b){
      if(b&1)res=mul(res,a);
      a=mul(a,a),b>>=1;
  }return res;
}

int inv2,fac[MAXN+5],ifac[MAXN+5];

void prepare(){
  fac[0]=1;
  for(int i=1;i<=MAXN;i++)fac[i]=mul(fac[i-1],i);
  ifac[MAXN]=fst_pow(fac[MAXN],MOD-2);
  for(int i=MAXN;i>=1;i--)ifac[i-1]=mul(ifac[i],i);
}
void NTT(int *a,int n,int x){
  for(int i=0,j=0;i<n;i++){
      if(i<j)swap(a[i],a[j]);
      int k=n>>1;
      while(k&&(k&j))j^=k,k>>=1;
      j^=k;
  }
  for(int i=1;i<n;i<<=1){
      int gn=fst_pow(G,(MOD-1)/(i<<1));
      for(int j=0;j<n;j+=(i<<1)){
          int g=1;
          for(int k=0;k<i;k++,g=mul(g,gn)){
              int X=a[j+k],Y=mul(a[i+j+k],g);
              a[j+k]=add(X,Y),a[i+j+k]=dec(X,Y);
          }
      }
  }
  if(x==1)return ;
  int ny=fst_pow(n,MOD-2);reverse(a+1,a+n);
  for(int i=0;i<n;i++)a[i]=mul(a[i],ny);
}
void ploy_inv(int n,int *a,int *b){
  static int c[MAXN+5];
  if(n==1){b[0]=fst_pow(a[0],MOD-2);return ;}
  ploy_inv((n+1)>>1,a,b);
  int len=1;
  while(len<(n<<1))len<<=1;
  copy(a,a+len,c);
  fill(c+n,c+len,0),NTT(c,len,1);
  fill(b+n,b+len,0),NTT(b,len,1);
  for(int i=0;i<len;i++)
  b[i]=mul(dec(2,mul(c[i],b[i])),b[i]);
  NTT(b,len,-1);
  fill(b+n,b+len,0);
}
void ploy_der(int n,int *a,int *b){
  for(int i=1;i<n;i++)b[i-1]=mul(a[i],i);
  b[n-1]=0;
}
void ploy_cal(int n,int *a,int *b){
  for(int i=1;i<n;i++)b[i]=mul(a[i-1],fst_pow(i,MOD-2));
  b[0]=0;
}
void ploy_ln(int n,int *a,int *b){
  static int A[MAXN+5],B[MAXN+5];
  fill(A,A+(n<<1),0),fill(B,B+(n<<1),0);
  ploy_der(n,a,A),ploy_inv(n,a,B);
  int len=1;while(len<(n<<1))len<<=1;
  NTT(A,len,1),NTT(B,len,1);
  for(int i=0;i<len;i++)A[i]=mul(A[i],B[i]);
  NTT(A,len,-1),ploy_cal(n,A,b);
}
void ploy_exp(int n,int *a,int *b){
  static int F[MAXN+5];
  if(n==1){b[0]=1;return ;}
  ploy_exp((n+1)>>1,a,b);
  fill(F,F+(n<<1),0),ploy_ln(n,b,F);
  for(int i=0;i<n;i++)F[i]=dec(a[i],F[i]);
  F[0]=add(F[0],1);
  int len=1;while(len<(n<<1))len<<=1;
  fill(b+n,b+len,0),NTT(b,len,1);
  fill(F+n,F+len,0),NTT(F,len,1);
  for(int i=0;i<len;i++)b[i]=mul(b[i],F[i]);
  NTT(b,len,-1),fill(b+n,b+len,0);
}
int n,m,f[MAXN+5],D[MAXN+5],dD[MAXN+5],tmp[MAXN+5],nh[MAXN+5];
void init(){
  m=1<<9;
  for(int i=0;i<m;i++)f[i]=mul(fst_pow(2,1LL*i*(i-1)/2%(MOD-1)),ifac[i]);
  ploy_ln(m,f,D);
  for(int i=0;i<m;i++)D[i]=mul(D[i],i);
  ploy_der(m,D,dD);NTT(dD,m<<1,1);
}
int solve(int n){
  for(int i=m;i<(m<<1);i++)tmp[i]=0;
  for(int i=0;i<m;i++)tmp[i]=mul(D[i],MOD-n);
  ploy_exp(m,tmp,nh);
  NTT(nh,m<<1,1);
  for(int i=0;i<(m<<1);i++)nh[i]=mul(dD[i],nh[i]);
  NTT(nh,m<<1,-1);
  return mul(nh[n-1],mul(fst_pow(n,MOD-2),fac[n-1]));
}
const long long mod=998244353;
long long a,g[100001],dp[401],h[401][401],d[10001],dp1[401],an,fr[100001];
long long pow_(long long qq,long long ww){long long ee=1;while(ww){if(ww&1) ee*=qq,ee%=mod;qq*=qq,qq%=mod,ww>>=1;}return ee%mod;}
int main(){
  prepare(),init();
  scanf("%lld",&a);
  for(int i=1;i<=a;i++) d[i]=read();
  for(int i=1;i<=a;i++)
  {
  	g[i]=solve(i);
  }
  h[0][0]=1;
  for(int i=1;i<=a;i++)
  {
	for(int j=0;j<=a;j++)
	{
		h[i][j]=h[i-1][j];
	}
	for(int j=1;j<=a;j++)
	{
		h[i][j]=(h[i][j]+h[i-1][j-1]*d[i])%mod;
	}
  }
  fr[1]=pow_(a,mod-2);
  for(int i=2;i<=a;i++)
  {
  	fr[i]=1;
  	for(int j=1;j<=i-2;j++) fr[i]=fr[i]*a%mod;
  }
//  cout<<g[4]<<" "<<g[5]<<"\n";
  dp[0]=1;
  for(int i=1;i<=a;i++)
  {
  	for(int j=0;j<=a;j++) dp1[j]=dp[j];
  	memset(dp,0,sizeof(dp));
  	for(int j=0;j<=a;j++)
	  {
	  	for(int k=1;k+j<=a;k++)
		  {
		  	dp[j+k]=(dp[j+k]+dp1[j]*ifac[k-1]%mod*g[k]%mod*k)%mod;
		  }
	  }
//	  	  cout<<dp[a]*fac[a-i]%mod<<" "<<fr[i]<<" "<<h[a][i]<<"\n";
	  	an=(an+dp[a]*fac[a-i]%mod*fr[i]%mod*h[a][i])%mod;
  }
  printf("%lld",(an%mod+mod)%mod);
  return 0;
}