Codeforces 120I

从后往前枚举新串与原串第一个大的位置，
然后后面的就可以随便选了，然后我们贪心保存后面能得到的最大值，直到最大值大于原串，
然后递归回去求字典序最小

#include<cstdio>
#include<cstring>
#include<iostream>
using namespace std;
const int N=2e5+100;
int cc[10]={119,36,93,109,46,107,123,37,127,111};
int mp[10][10];
int num[10],nx;
int f(int x){
    int cnt=0;
    while(x){
        cnt++;x-=x&-x;
    }
    return cnt;
}

int sum[N],sum2[N];char ss[N];
int n,m;
void fun(int id,int x,int ll,int rr){
    ss[id]=x+'0';
    if(id==n){
        printf("%s\n",ss+1);return ;
    }
    ll+=mp[ss[id-m]-'0'][x];rr-=num[ss[id+1-m]-'0'];
    for(int i=0;i<10;i++){
        if(ll+rr+mp[ss[id+1-m]-'0'][i]>sum[m]){
            fun(id+1,i,ll,rr);break;
        }
    }
}
void gun(int id,int x,int ll){
    ss[id]=x+'0';
    if(id==m)return ;
    ll+=num[x];
    for(int i=0;i<10;i++){
        if(ll+num[i]+(m-id-1)*num[nx]>sum[m]){
            gun(id+1,i,ll);break;
        }
    }
}
int main(){
    #ifdef DouBi
    freopen("in.cpp","r",stdin);
    #else
        freopen("input.txt","r",stdin);
        freopen("output.txt","w",stdout);
    #endif // DouBi
    for(int i=0;i<10;i++){
        for(int j=0;j<10;j++)mp[i][j]=f(cc[i]&cc[j]);
    }
    nx=0;
    for(int i=0;i<10;i++){
        num[i]=0;
        for(int j=0;j<10;j++){
            num[i]=max(num[i],mp[i][j]);
        }
        if(num[i]>num[nx])nx=i;
    }
    while(scanf("%s",ss+1)!=EOF){
        n=strlen(ss+1);
        m=n/2;
        sum[0]=0;sum2[0]=0;
        for(int i=1;i<=m;i++){
            sum[i]=sum[i-1]+mp[ss[i]-'0'][ss[i+m]-'0'];
            sum2[i]=sum2[i-1]+num[ss[i]-'0'];
        }
        int flag=0,rr=0;
        for(int i=n;i>m;i--){
            for(int j=ss[i]-'0'+1;j<10;j++){
                if(sum[i-m-1]+rr+mp[ss[i-m]-'0'][j]>sum[m]){
                    fun(i,j,sum[i-m-1],rr);flag=1;break;
                }
            }
            if(flag)break;
            rr+=num[ss[i-m]-'0'];
        }
        if(flag)continue;
        for(int i=m;i>=1;i--){
            for(int j=ss[i]-'0'+1;j<10;j++){
                if(sum2[i-1]+(m-i)*num[nx]+num[j]>sum[m]){
                    gun(i,j,sum2[i-1]);
                    flag=1;break;
                }
            }
            if(flag){
                rr=0;
                for(int j=m;j>1;j--){
                    rr+=num[ss[j]-'0'];
                }
                for(int j=0;j<10;j++){
                    if(rr+mp[ss[1]-'0'][j]>sum[m]){
                        fun(m+1,j,0,rr);break;
                    }
                }
                break;
            }
        }
        if(!flag)printf("-1\n");
    }
    return 0;
}