#include<bits/stdc++.h>
using namespace std;using ll=long long;
int rd(int x=0,char c=getchar()){int f=1;while(!isdigit(c))f=(c^'-'?1:-1),c=getchar();while(isdigit(c))x=x*10+(c^48),c=getchar();return x*f;}
const int N=214;const ll mod=998244353;
ll fac[N],inv[N];
ll ksm(ll a,ll b,ll r=1){while(b){if(b&1)r=r*a%mod;a=a*a%mod;b>>=1;}return r;}
void init(int n){
    inv[0]=fac[0]=inv[1]=1;
    for(int i=2;i<=n;i++)inv[i]=(mod-mod/i)*inv[mod%i]%mod;
    for(int i=1;i<=n;i++)fac[i]=fac[i-1]*i%mod,inv[i]=inv[i-1]*inv[i]%mod;
}
ll C(int n,int m){return fac[n]*inv[m]%mod*inv[n-m]%mod;}
int n,m;
int a[N],S;
ll dp[N][N*N];
int md(const int&x){return x>mod+100?x-mod:x;} 
int main(){
	n=rd(),m=rd();
	init(n);
	dp[0][0]=1;
	for(int i=1;i<=n;i++){
		S+=(a[i]=rd());
		for(int j=i;j>=1;j--)for(int k=S;k>=a[i];k--)
		dp[j][k]=md(dp[j][k]+dp[j-1][k-a[i]]);
	}
	ll ans=0;;;;;;
	for(int i=1;i<=n;i++)for(int j=1,X=ksm(C(n,i),mod-2),Y=ksm(i,mod-2);j<=S;j++){
		if(i*m<j)ans=md(ans+m*dp[i][j]%mod*X%mod);
		else ans=md(ans+(ll)j*Y%mod*X%mod*dp[i][j]%mod);
	}printf("%lld",ans);
	return 0;
}