#include<bits/stdc++.h>
using namespace std;
int a[20],n,x,id[20],f[2005][24005],sum[2005][24005],g[2005][24005],val1[20005][10],val2[20005][10];
const int mod=998244353;
void Add(int &x,int y){x=(x+y>=mod?x+y-mod:x+y);}
int main()
{
    cin.tie(0)->sync_with_stdio(0);
    cin>>n;
	for(int i=1;i<=n;i++)cin>>x,a[x]++;
	int num1=0,num2=0;f[0][0]=1;
	for(int i=3;i<=11;i+=2)
	{
		num1+=a[i];num2+=a[i]*i;
		for(int j=0;j<=num1;j++)for(int k=0;k<=num2;k++)
		{
			sum[j][k]=(j>0&&k>=i?sum[j-1][k-i]:0);
			Add(sum[j][k],f[j][k]);f[j][k]=0;
		}
		for(int j=0;j<=num1;j++)
		{
			for(int k=0;k<=num2;k++)
			{
				int lim=min(min(j,a[i]),k/i);
				f[j][k]=sum[j][k]-(j>lim&&k>=(lim+1)*i?sum[j-lim-1][k-(lim+1)*i]:0);
				Add(f[j][k],mod); 
			}
		}
	}
	for(int i=0;i<=num1;i++)for(int j=0;j<=num2;j++)sum[i][j]=g[i][j]=0;
	for(int i=0;i<=num1;i++)
	{
		for(int j=0;j<=num2;j++)
		{
			if(!f[i][j])continue;
			if(i>=a[1])Add(sum[i][j],f[i][j]),Add(sum[i+a[1]+1][j+a[1]+1],mod-f[i][j]);
			else 
			{
				Add(sum[i][j],f[i][j]);Add(sum[i+i][j+i],mod-f[i][j]);
				int now1=(a[1]-i+2)/2,now2=(a[1]-i+1)/2;
				Add(g[i+i][j+i],f[i][j]);Add(g[i+i+now1][j+i+now1*2],mod-f[i][j]);
				Add(g[i+i][j+i+1],f[i][j]);Add(g[i+i+now2][j+i+1+now2*2],mod-f[i][j]);
			}
			f[i][j]=0;
		}
	}
	num1+=a[1];num2+=a[1];
	for(int i=0;i<=num1;i++)
	{
		for(int j=0;j<=num2;j++)
		{
			if(i>=1&&j>=1)Add(sum[i][j],sum[i-1][j-1]);
			if(i>=1&&j>=2)Add(g[i][j],g[i-1][j-2]);
			Add(f[i][j],sum[i][j]);Add(f[i][j],g[i][j]);
		}
	}
	for(int i=0;i<=num1;i++)for(int j=0;j<=num2;j++)sum[i][j]=g[i][j]=0;
	int lst1=num1,lst2=num2;
	g[0][0]=1;num1=0;num2=0;
	for(int i=2;i<=12;i+=2)
	{
		num1+=a[i];num2+=a[i]*i;
		for(int j=0;j<=num1;j++)for(int k=0;k<=num2;k++)
		{
			sum[j][k]=(j>0&&k>=i?sum[j-1][k-i]:0);
			Add(sum[j][k],g[j][k]);g[j][k]=0;
		}
		for(int j=0;j<=num1;j++)
		{
			for(int k=0;k<=num2;k++)
			{
				int lim=min(min(j,a[i]),k/i);
				g[j][k]=sum[j][k]-(j>lim&&k>=(lim+1)*i?sum[j-lim-1][k-(lim+1)*i]:0);
				Add(g[j][k],mod); 
			}
		}
	}
	int ans=0,w1=0,w2=0;
	for(int i=0;i<=lst1;i++)for(int j=0;j<=lst2;j++)Add(w1,f[i][j]);
	for(int i=0;i<=num1;i++)for(int j=0;j<=num2;j++)Add(w2,g[i][j]);
	for(int i=0;i<=lst1;i++)
	{
		for(int j=0;j<=lst2;j++)Add(ans,1ll*(i+1)*f[i][j]%mod*w2%mod),Add(val1[j/10-i+5000][j%10],f[i][j]);
	}
	for(int i=0;i<=num1;i++)
	{
		for(int j=0;j<=num2;j++)Add(ans,1ll*i*g[i][j]%mod*w1%mod),Add(val2[j/10-i+5000][j%10],g[i][j]);
	}
	for(int i=-lst1;i<=lst2/10;i++)
	{
		for(int p=0;p<10;p++)
		{
			if(!val1[i+5000][p])continue;
			for(int j=-num1;j<=num2/10;j++)
			{
				if(i+j>1)break;
				for(int q=0;q<10;q++)
				{
					if(!val2[j+5000][q])continue;
					if(i+j+(p+q)/10<0)Add(ans,mod-1ll*val1[i+5000][p]*val2[j+5000][q]%mod*abs(i+j+(p+q)/10)%mod);
				}
			}
		}
	}
	cout<<ans;
 	return 0;
}