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

#define getrp() ({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 aaa(x) ({ulong _r=x;_r-(_r<MD?0:MD);})
#define MD 998244353

typedef unsigned long ulong;

int main(){
	char*rp=getrp();
	int c;
	ulong e=1,f=0,g=0,h=0;
	while(c=*rp++,c!=10){
		if(c=='0'){
			h=aaa(h+g);
			f=aaa(f+e);
		}
		else if(c=='1'){
			g=aaa(g+f);
		}
		else {
			h=aaa(aaa(h+h)+g);
			g=aaa(aaa(g+g)+f);
			f=aaa(aaa(f+f)+e);
			e=aaa(e+e);
		}
	}
	wt1(h);
	_exit(0);
}