正确答案（字符串处理）

正确答案

题目描述：
小 H 与小 Y 刚刚参加完 UOIP 外卡组的初赛，就迫不及待的跑出考场对答案。
“吔，我的答案和你都不一样！”，小 Y 说道，”我们去找神犇们问答案吧”。
外卡组试卷中共有 m 道判断题，小 H 与小 Y 一共从其他 n 个神犇那问了答案。之后又从小 G 那里得知， 这 n 个神犇中有 p 个考了满分， q 个考了零分， 其他神犇不为满分或零分。
这可让小 Y 与小 H 犯了难。你能帮助他们还原出标准答案吗？如有多解则输出字典序最小的那个。无解输出-1。
输入格式：
第一行四个整数 n, m, p, q，意义如上描述。
接下来 n 行，每一行 m 个字符’N’或’Y’，表示这题这个神犇的答案。
输出格式：
仅一行，一个长度为 m 的字符串或是-1。
样例输入：
2 2 2 0
YY
YY
样例输出：
YY
数据范围：
30%:n<=100.
60%:n<=5000,m<= 100.
100%:1<=n<=30000,1<=m<=500.0<=p,q且p+q<=n.
注意：
scanf无法读入string，但是cin非常慢（貌似三倍的关系），所以scanf一个char[]然后根据长度，把char[]中的元素挨个赋值到string，这样做虽然看上去慢，但实测还是比cin快。
本题中还手动模拟了，根据字典序找字符串的全排列。

#include<iostream>
#include<cstdio>
#include<algorithm>
#include<map>
using namespace std;
const int maxn=30010;
int n,m,r,w,tot,a[maxn],f[maxn];
char in[maxn];
bool ifgo;
string s[maxn];
map<string,int> g;
bool judge(int x,int y)
{
    int len1=s[x].size();
    int len2=s[y].size();
    for(int i=0;i<len1;i++)
    if((s[x][i]=='N'&&s[y][i]=='N')||
      (s[x][i]=='Y'&&s[y][i]=='Y'))
      return 0;
    return 1;
}
bool can(int x)
{
    string t=s[x];
    int sum=0;
    for(int i=0;i<t.size();i++)
    {
        if(t[i]=='N')
        t[i]='Y';
        else t[i]='N';
    }
    for(int i=1;i<=n;i++)
    if(t==s[i]) sum++;
    if(sum!=0)  return 0;
    return true;
}
void work1()
{
    string t1,t2;
    for(int i=0;i<m;i++)
    t1+='N',t2+='Y';
    while(1)
    {
        if(!g[t1]&&!g[t2])
        {
            cout<<t1;
            ifgo=1;
            return;
        }
        int flag=-1;
        for(int i=m-1;i>=0;i--)
        {
            if(t1[i]=='N')
            {
                flag=i;
                break;
            }
        }
        if(flag==-1)
        {
            printf("-1");
            ifgo=1;
            return;
        }
        t1[flag]='Y',t2[flag]='N';
        for(int i=flag+1;i<m;i++)
        t1[i]='N',t2[i]='Y';
    }
}
void work2()
{
    for(int i=1;i<=tot;i++)
    if(a[i]==r)
    {
        if(can(f[i]))
        {
            cout<<s[f[i]];
            ifgo=1;
            return;
        }
    }
}
void work3()
{
    for(int i=tot;i>=1;i--)
    if(a[i]==w)
    {
        if(can(f[i]))
        {
            for(int j=0;j<s[f[i]].size();j++)
            {
                if(s[f[i]][j]=='N')
                printf("Y");
                else printf("N");
            }
            ifgo=1;
            return;
        }
    }
}
void work4()
{
    for(int i=1;i<=tot;i++)
    if(a[i]==r)
    {
        for(int j=1;j<=tot;j++)
        {
            if(i==j) continue;
            if(a[j]==w)
            if(judge(f[i],f[j]))
            {
                cout<<s[f[i]];
                ifgo=1;
                return;
            }
        }
    }
    printf("-1");
    return;
}
int main()
{
    freopen("answer.in","r",stdin);
    freopen("answer.out","w",stdout);
    scanf("%d%d%d%d",&n,&m,&r,&w);
    for(int i=1;i<=n;i++)
    {
        scanf("%s",&in);
        for(int j=0;j<m;j++)
        s[i]+=in[j];
        g[s[i]]++;
    }
    sort(s+1,s+n+1);
    a[1]=1,tot=1,f[1]=1;
    for(int i=2;i<=n;i++)
    {
        if(s[i]==s[i-1])
        a[tot]++;
        else a[++tot]=1,f[tot]=i;
    }
    if(w==0&&r==0)       work1();
    else if(w==0&&!ifgo) work2();
    else if(r==0&&!ifgo) work3();
    else if(!ifgo)       work4();
    return 0;
}