#!ruby -nl d=->n{n.sum-48*n.size} f=->n,k=1{(k..n).reduce(:*)||1} l= ~/$/ s=0 $.>1&&l.times{|i|s+=$_[i].hex*f[l,l+~i]/f[i]}&&p(d[s.to_s])