M=998244353;d=[0]*10;r=0
F=[s:=1]+[s:=s*-~i%M for i in range(1<<18)]
for i in input():d[int(i)]+=1
for i in range(1,10):
  if d[i]<1:continue
  c=1
  for j in range(10):c*=F[d[j]-(j==i)]
  r+=pow(c,-1,M)%M
print(F[sum(d)-1]*r%M)