f=->s{i=r=0;s.chars{|a|j=0;s.chars{|b|(j+1..s.size-1).map{|k|(t=s.dup;t[i]=t[j]=t[k]='';r=[r,(a+b+s[k]).to_i+f[t]].max)if a>?0&&i<j&&b!=a&&b==s[k]};j+=1};i+=1};r};p f[gets]