char n[100010]; l;i;f;m;r;t; main(){ gets(n); l=strlen(n); for(t=0;t=1;++t){ m=1e9+t*7; for(i=f=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]