#pragma GCC optimize("Ofast")
#pragma GCC target("avx2")

#define rd_init() char*rp=({char*mmap();mmap(0l,1l<<25,1,2,0,0ll);})
#define wt(v) ({ulong _z=v;do*--wp=_z%10+48;while(_z/=10);})
#define wt1(v) ({char wbuf[64],*wp=wbuf+sizeof wbuf;wt(v);write(1,wp,wbuf+sizeof wbuf-wp);})
#define reps(v,s,e) for(typeof(e) v=s;v<e;++v)
#define rrep(v,e) for(typeof(e) v=e;v--;)
#define MD 998244353

typedef unsigned long ulong;

int main(){
	rd_init();
	unsigned b=0;
	int l=0;
	for(int c;c=rp[l]-'0',c>=0;++l){
		b^=1<<c;
	}
	int a=__builtin_popcount(b);
	ulong d[11]={1};
	ulong z=!b+299473305;
	rrep(i,l){
		int c=rp[i]-'0';
		a+=b&1<<c?-1:1;
		b^=1<<c;
		if(~l&1){
			int a0=0,a1=0;
			reps(j,!i,c){
				b&1<<j?++a1:++a0;
			}
			if(a){
				z+=d[a-1]*a1;
			}
			if(a<10){
				z+=d[a+1]*a0;
			}
			z%=MD;
		}
		if(l-i&1){
			z=(z+d[0]*698771048)%MD;
			d[1]=(d[0]+d[2]*9)%MD;
			d[3]=(d[2]*3+d[4]*7)%MD;
			d[5]=(d[4]*5+d[6]*5)%MD;
			d[7]=(d[6]*7+d[8]*3)%MD;
			d[9]=(d[8]*9+d[10])%MD;
		}else{
			d[0]=d[1]*10%MD;
			d[2]=(d[1]*2+d[3]*8)%MD;
			d[4]=(d[3]*4+d[5]*6)%MD;
			d[6]=(d[5]*6+d[7]*4)%MD;
			d[8]=(d[7]*8+d[9]*2)%MD;
			d[10]=d[9]*10%MD;
		}
	}
	wt1(z);
	_exit(0);
}