班长竞选

题目：班长竞选
题意：
大学班级选班长，N 个同学均可以发表意见
若意见为 A B 则表示 A 认为 B 合适，意见具有传递性，即 A 认为 B 合适，B 认为 C 合适，则 A 也认为 C 合适
勤劳的 TT 收集了M条意见，想要知道最高票数，并给出一份候选人名单，即所有得票最多的同学，你能帮帮他吗？

输入：
本题有多组数据。第一行 T 表示数据组数。每组数据开始有两个整数 N 和 M (2 <= n <= 5000, 0

输出：
对于每组数据，第一行输出 “Case x: ”，x 表示数据的编号，从1开始，紧跟着是最高的票数。
接下来一行输出得票最多的同学的编号，用空格隔开，不忽略行末空格！

样例：

解题思路：这个题可以把学生看作点，把a->b投票看作边构图；然后通过scc求强联通分量，每个分量中的每个点的value为点的个数-1；之后进行缩点，每个强连通分量为一个点（缩点后也是逆序图）；如果存在a->b，则b中每个点的票数+=a中点的个数（每个点只能用一次），这时候就可以用入度为0的点跑整个图，找到最大的那个就是我们要求的，之后再列出那个缩点中点就可以了；

代码：

#include
#include
#include
#include
#include
#include
using namespace std;
int n,m;
vector<int> g[5005],g1[5005],g0[5005];
int in[5005],out[5005],d[5005],f[5005],dcnt=0,tcnt=0,vis[5005],ans[5005],maxn=0,jilu[5005];
void dfs(int x)//scc正逆图各跑一遍
{
    vis[x]=1;
    for(int i=0;i<g[x].size();i++)
    {
        if(!vis[g[x][i]])
        {
            dfs(g[x][i]);
        }
    }
    d[++dcnt]=x;
}
void dfs1(int x)
{
    f[x]=tcnt;
    for(int i=0;i<g0[x].size();i++)
    {
        if(!f[g0[x][i]])
        {
            dfs1(g0[x][i]);
        }
    }
}
void dfs2(int x,int y)//从入度为0的点开始跑
{
    vis[x]=1;
    for(int i=0;i<g1[x].size();i++)
    {
        int to=g1[x][i];
        if(!vis[to])
        {
            jilu[y]+=(jilu[to]+1);//加上，这里y是入度为0的点，所以修改它的票数不影响结果
            dfs2(to,y);
        }
    }
}
void suodian()
{
    for(int i=0;i<n;i++)
    {
        for(int j=0;j<g0[i].size();j++)
        {
            if(f[i]!=f[g0[i][j]])//缩点，逆序图
            {
                g1[f[i]].push_back(f[g0[i][j]]);
                in[f[g0[i][j]]]++;
            }
        }
    }
}
void sousuo()//搜索入度为0的点之后dfs
{
    for(int i=1;i<=tcnt;i++)
    {
        if(in[i]==0)
        {
            memset(vis,0,sizeof(vis));
            dfs2(i,i);
        }
    }
}
int main()
{
    int p;
    scanf("%d",&p);
    int s=0;
    while(p--)
    {
        s++;
        memset(in,0,sizeof(in));
        memset(out,0,sizeof(out));
        memset(d,0,sizeof(d));
        memset(f,0,sizeof(f));
        memset(vis,0,sizeof(vis));
        memset(ans,0,sizeof(ans));
        memset(jilu,0,sizeof(jilu));
        dcnt=tcnt=maxn=0;
        scanf("%d%d",&n,&m);
        for(int i=0;i<=n;i++)
        {
            g[i].clear();
            g1[i].clear();
            g0[i].clear();
        }
        int x,y;
        for(int i=0;i<m;i++)//正逆图
        {
            scanf("%d%d",&x,&y);
            g[x].push_back(y);
            g0[y].push_back(x);
        }
        for(int i=0;i<n;i++)
        {
            if(!vis[i])
            {
                dfs(i);
            }
        }
        for(int i=n;i>=1;i--)
        {
            if(!f[d[i]])
            {
                tcnt++;
                dfs1(d[i]);
            }
        }
        for(int i=0;i<n;i++)//初始化
        {
            jilu[f[i]]++;
        }
        for(int i=1;i<=tcnt;i++)
        {
            jilu[i]--;
        }
        suodian();
        sousuo();
        for(int i=1;i<=tcnt;i++)//找最大的那个
        {
            maxn=max(maxn,jilu[i]);
        }
        printf("Case %d: %d\n",s,maxn);
        int ff=0;
        for(int i=0;i<n;i++)//扫一遍
        {
            if(jilu[f[i]]==maxn)
            {
                if(ff==0)
                {
                    ff=1;
                }else
                {
                    printf(" ");
                }
                printf("%d",i);
            }
        }
        printf("\n");
    }
}
/*
8
8 11
0 1
1 2
2 0
2 7
6 2
6 7
3 0
3 6
4 3
6 5
5 4
*/