2016-2017 ACM-ICPC, NEERC, Southern Subregional Contest A Toda2 贪心

/*
    题目描述：给出n个人的分数，每轮选出2~5个人，把他们的分数减1，现要求把所有人的分数全部变成t，要求t最大，
           输出每一轮选人的策略。
                    
    思路：注意两个性质：
                1、每轮选2个或3个人，因为如果有一轮选了4个人，可以分成两轮每轮选两个人；如果有一轮选了5个人，可
                    以分成两轮，一轮选2个人，一轮选3个人
                2、如果最终所有人的分数是t（即保证t是可以实现的分数的前提下），所有人初始时的分数总和是sum，那
                    么sum-n*t如果是偶数的话，一定可以通过每一轮选两个人来实现；如果是奇数的话，一定可以通过有一轮
                    选3人，其余每轮选两人来实现。
*/
#pragma warning(disable:4786)
#pragma comment(linker, "/STACK:102400000,102400000")
#include<iostream>
#include<cstdio>
#include<cstring>
#include<algorithm>
#include<stack>
#include<queue>
#include<map>
#include<set>
#include<vector>
#include<cmath>
#include<string>
#include<sstream>
#define LL long long
#define FOR(i,f_start,f_end) for(int i=f_start;i<=f_end;++i)
#define mem(a,x) memset(a,x,sizeof(a))
#define lson l,m,x<<1
#define rson m+1,r,x<<1|1
using namespace std;
const int INF = 0x3f3f3f3f;
const int mod = 1e9 + 7;
const double PI = acos(-1.0);
const double eps=1e-6;
const int maxn = 1e2 + 5 ;
int ans[maxn * maxn][maxn] , r[maxn] , n ;
struct node
{
    int val , num ;
    bool operator<(const node & rhs)const
    {
        return val < rhs.val ;
    }
};
int solve(int x)
{
    mem(ans ,0) ;
    priority_queue<node>Q;
    int sum = 0;
    for(int i = 1 ; i<= n ; i++){
        node st = {r[i] - x , i} ;
        if(st.val != 0){
            sum += st.val ;
            Q.push(st) ;
        }
    }
    int cnt = Q.size() , cur = 1 ;
    node y[4] ;
    if(sum & 1){
        if(cnt < 3)   return 0;
        for(int i = 1 ; i <= 3 ; i++){
            y[i] = Q.top();
            --y[i].val ;
            ++ans[cur][y[i].num];
            Q.pop();
        }
        for(int i = 1 ; i<= 3 ; i++){
            if(y[i].val != 0){
                Q.push(y[i]);
            }
        }
        ++cur;
    }
    while(!Q.empty()){
        for(int  i = 1 ; i<= 2 ; i++){
            y[i] = Q.top();
            Q.pop();
            ++ans[cur][y[i].num];
            --y[i].val ;
        }
        for(int i = 1 ; i<= 2 ; i++){
            if(y[i].val != 0){
                Q.push(y[i] ) ;
            }
        }
        ++cur;
        if(Q.size() == 1)
            return 0 ;
    }
    return (cur - 1 ) ;
}
int main()
{
    while(scanf("%d",&n)!=EOF){
        int maxv = -1 , minv = INF , tag = 0 ;
        for(int i = 1 ; i<= n ; i++){
            scanf("%d",&r[i]);
            if(i >1 && r[i] != r[i-1])      tag = 1;
            minv = min(minv , r[i]) ;
            maxv = max(maxv , r[i]) ;
        }
        if(!tag){
            printf("%d\n0\n",r[1]);
            continue ;
        }
        int flag = 0 , res , t ;
        for(int i = minv ; i > 0  ; --i){
            if(t = solve(i)){
                flag = 1 ;
                res = i ;
                break;
            }
        }
        if(!flag){
            printf("%d\n%d\n", 0 , n * maxv);
            for(int i = 1 ; i<= n ; i++){
                for(int j = 1 ; j<= maxv ; j++){
                    for(int k = 1 ; k <= n ; k++){
                        if(k == 1 || k == 2 || k == i)
                            printf("1");
                        else
                            printf("0");
                    }
                    printf("\n") ;
                }
            }
        }
        else{
            printf("%d\n%d\n",res , t );
            for(int i = 1 ; i<= t ; i++){
                for(int j = 1 ; j<= n ; j++){
                    printf("%d",ans[i][j]);
                }
                printf("\n") ;
            }
        }
    }
    return 0;
}