MOD = 998244353i64
n = read_line.chars.map(&.to_i)
l = n.size
pow9 = Array.new(l + 1, 1i64)
l.times { |i| pow9[i + 1] = pow9[i] * 9 % MOD }
ans = 0i64
l.times do |i|
  if n[i] == 9
    ans += pow9[l - 1 - i] * 8
  else
    ans += pow9[l - 1 - i] * n[i]
  end
  ans %= MOD
  break if n[i] == 8
  ans += 1 if i == l - 1
end
all = 0i64
l.times do |i|
  all = all * 10 + n[i]
  all %= MOD
end
all += 1
puts (all - ans + MOD) % MOD