char s[9];f(u,i,j,k,a,p,q){for(i=a=0;p=s[j=i];++i)for(;q=u>>i&p>48?s[k=++j]:0;)for(;u>>j&p!=q&&s[++k];)a=fmax(a,u>>k&q==s[k]?p*100+q*11-5328+f(u^1<<i^1<<j^1<<k):0);return a;}x;main(){x=!printf("%d",f(~!gets(s)));}