a,b,c,*d=$<.map &:to_i
p a+=b*(d.size-d.uniq.size)