/* * Author: $%U%$ * Time: $%Y%$-$%M%$-$%D%$ $%h%$:$%m%$:$%s%$ */ #include using namespace std; typedef long long ll; #define rep(i,a,b) for(ll i=(a);i<=(b);i++) #define per(i,a,b) for(ll i=(a);i>=(b);i--) #define re(i,a,b) for(ll i=(a);i<(b);i++) #define pe(i,a,b) for(ll i=(a);i>(b);i--) #define getchar()(p1==p2&&(p2=(p1=buf)+fread(buf,1,1<<21,stdin),p1==p2)?EOF:*p1++) char buf[1<<21],*p1=buf,*p2=buf; template inline void read(T& r) { r=0;bool w=0; char ch=getchar(); while(ch<'0'||ch>'9') w=ch=='-'?1:0,ch=getchar(); while(ch>='0'&&ch<='9') r=r*10+(ch^48), ch=getchar(); r=w?-r:r; } template inline void readupp(T& r){ r=0; char ch=getchar(); while(ch>'Z'||ch<'A')ch=getchar(); r=ch; } template inline void readlow(T& r){ r=0; char ch=getchar(); while(ch>'z'||ch<'a')ch=getchar(); r=ch; } template inline void readdig(T& r){ r=0; char ch=getchar(); while(ch>'9'||ch<'0')ch=getchar(); r=ch-'0'; } template inline void readvisi(T& r){ r=0; char ch=getchar(); while(ch>126||ch<33)ch=getchar(); r=ch; } template inline ll readlowstr(T& r){ ll n=0; char ch=getchar(); while(ch>'z'||ch<'a')ch=getchar(); while(ch<='z'&&ch>='a')r[++n]=ch-'a',ch=getchar(); return n; } template inline ll readuppstr(T& r){ ll n=0; char ch=getchar(); while(ch>'Z'||ch<'A')ch=getchar(); while(ch<='Z'&&ch>='A')r[++n]=ch-'A',ch=getchar(); return n; } template inline ll readdigstr(T& r){ ll n=0; char ch=getchar(); while(ch>'9'||ch<'0')ch=getchar(); while(ch<='9'&&ch>='0')r[++n]=ch-'0',ch=getchar(); return n; } template inline ll readvisistr(T& r){ ll n=0; char ch=getchar(); while(ch>126||ch<33)ch=getchar(); while(ch<=126&&ch>=33)r[++n]=ch,ch=getchar(); return n; } const ll MOD=998244353; ll gcd(ll A,ll B){return B?gcd(B,A%B):A;} template void chkmax(T&A,T B){if(A void chkmin(T&A,T B){if(A>B)A=B;} template T Madd(T A,T B){return A+B>=MOD?A+B-MOD:A+B;} template T Msub(T A,T B){return A-B<0?A-B+MOD:A-B;} template void MODed(T &A){A%=MOD;A+=(A<0?MOD:0);} ll pw(ll A,ll B){ ll res=1; while(B){ if(B&1)res=res*A%MOD; A=A*A%MOD; B>>=1; } return res; } void _FILE(string s){ freopen((s+".in").c_str(),"r",stdin); freopen((s+".out").c_str(),"w",stdout); } const ll N=1000000,M=3003,INF=2000000000000000007ll; ll o[N],rr,dp[N]; bool flag; int main(){ rr=readdigstr(o); rep(i,0,rr-1)o[i]=o[i+1]; rep(i,0,rr-1)if(rr-1-i>i)swap(o[i],o[rr-1-i]); per(i,rr-1,0){ if(!flag)dp[i]=(o[i]-(o[i]==9))*pw(9,i); else dp[i]=0; if(o[i]==8)flag=1; } ll ans=0; rep(i,0,rr-1)ans=(ans+dp[i])%MOD; if(flag==0)ans++; ll nn=0; per(i,rr-1,0)nn=(nn*10+o[i])%MOD; printf("%lld\n",(nn-ans+1+MOD)%MOD); return 0; }