puts $<.map{|i|l=d=0;i.gsub(/.../){|j|
k="一十百千二三四五六七八九".index(j)/3
l=k<4?(d+=(l>0?l:1)*10**k;0):k-2}
d+l}