#define MD 998244353
ll@n,@k,@c[n],@d[],a[1001]{},b[],e[]{},y=0;
Mint f[]{1},z=1;
rep(i,n){
	if(a[c[i]]<d[i]){
		a[c[i]]=d[i];
		b[c[i]]=0;
	}
	if(a[c[i]]==d[i]){
		b[c[i]]+=1;
	}
}
rep(i,1,k+1){
	rep(j,i+1){
		if(a[j]){
			if(e[i]<e[i-j]+a[j]){
				e[i]=e[i-j]+a[j];
				f[i]=0;
			}
			if(e[i]==e[i-j]+a[j]){
				f[i]+=f[i-j]*b[j];
			}
		}
	}
	if(y<e[i]){
		y=e[i];
		z=0;
	}
	if(y==e[i]){
		z+=f[i];
	}
}
wtLn(y,z);