char n[100010]; l;i;f;m;r;t; main(){ gets(n); l=strlen(n); for(t=0;t<8;t+=7){ m=1e9+t; for(i=f=r=0;i<(l+1)/2;++i){ r=(r*10ll+n[i]-48+(i>0||~l&1)*9)%m; f=n[i]>n[l-i-1]?1:n[i]