STDIN.each{|l|v=a=i=0
0.step(l.size-3,3){|i|s=l[i,3]
if j='一二三四五六七八九'.index(s)
a=j/3+1
else
v+=(a>0?a:1)*10**('十百千'.index(s)/3+1)
a=0
end
i+=3}
p v+a}