拓扑排序,若一个由图中所有点构成的序列 A 满足:对于图中的每条边 (x,y),x 在 A 中都出现在 y之前,则称 A是该图的一个拓扑序列。
实质上是图的宽度优先遍历;
模板:
bool topsort()
{
int hh = 0, tt = -1;
// d[i] 存储点i的入度
for (int i = 1; i <= n; i ++ )
if (!d[i])
q[ ++ tt] = i;
while (hh <= tt)
{
int t = q[hh ++ ];
for (int i = h[t]; i != -1; i = ne[i])
{
int j = e[i];
if (-- d[j] == 0)
q[ ++ tt] = j;
}
}
// 如果所有点都入队了,说明存在拓扑序列;否则不存在拓扑序列。
return tt == n - 1;
}
例题:
有向图的拓扑排序:
给定一个 n 个点 m 条边的有向图,点的编号是 1 到 n,图中可能存在重边和自环。
请输出任意一个该有向图的拓扑序列,如果拓扑序列不存在,则输出 −1。
若一个由图中所有点构成的序列 A 满足:对于图中的每条边 (x,y),x 在 A 中都出现在 y 之前,则称 A 是该图的一个拓扑序列。
输入格式
第一行包含两个整数 n 和 m。
接下来 m 行,每行包含两个整数 x 和 y,表示存在一条从点 x 到点 y 的有向边 (x,y)。
输出格式
共一行,如果存在拓扑序列,则输出任意一个合法的拓扑序列即可。
否则输出 −1。
数据范围
1≤n,m≤105
输入样例:
3 3
1 2
2 3
1 3
输出样例:
1 2 3
代码与题解:
//重边和自环用特殊处理
//本质上是图的广度优先遍历
#include <iostream>
#include <cstring>
using namespace std;
const int N=1e5+10,M=1e5+10;//N为点的个数,M为边的个数
int n,m;
int h[N],ne[N],e[N],idex;//图的存储结构
int i=-1,j=0,q[N];//q为队列
int d[N];//d为当前点的度数
void add(int a,int b){//图的存储函数
ne[idex]=h[a],e[idex]=b,h[a]=idex++;
d[b]++;//存储度数
}
bool topusort(){//拓扑排序
for(int k=1;k<=n;k++){//初始化队列,遍历入度数组,将入度为0的点加入
if(d[k]) continue;
q[++i]=k;
}
while(j<=i){//当队列不空
int c=q[j++];//队头元素,出队
for(int k=h[c];k!=-1;k=ne[k]){//枚举c结点的所有出边,并减去
d[e[k]]--;
if(d[e[k]]==0) q[++i]=e[k];//减去后如果找到入度为0的点,就将它入队
}
}
if(j==n) return true;//最后如果队列里进队出队分别都有n个,那就说明存在拓扑排序,且拓扑排序是出队顺序
return false;
}
int main(){
cin>>n>>m;
memset(h,-1,sizeof(h));
for(int k=0;k<m;k++){
int a,b;
scanf("%d%d",&a,&b);
add(a,b);
}
if(topusort()){
for(int k=0;k<n;k++){
printf("%d ",q[k]);
}
return 0;
}
cout<<-1<<endl;
return 0;
}
家谱树:
有个人的家族很大,辈分关系很混乱,请你帮整理一下这种关系。
给出每个人的孩子的信息。
输出一个序列,使得每个人的孩子都比那个人后列出。
输入格式
第 1 行一个整数 n,表示家族的人数;
接下来 n 行,第 i 行描述第 i 个人的孩子;
每行最后是 0 表示描述完毕。
每个人的编号从 1 到 n。
输出格式
输出一个序列,使得每个人的孩子都比那个人后列出;
数据保证一定有解,如果有多解输出任意一解。
数据范围
1≤n≤100
输入样例:
5
0
4 5 1 0
1 0
5 3 0
3 0
输出样例:
2 4 5 3 1
代码与题解:
//这题要注意边数组的大小,M取(N+1)*N/2
include <iostream>
#include <cstring>
using namespace std;
const int N=110,M=N*(N+1)/2;
int n;
int h[N],ne[M],e[M],idex;
int d[N];
int i=-1,j=0,q[N];
void add(int a,int b){
ne[idex]=h[a],e[idex]=b,h[a]=idex++;
d[b]++;
}
void topusort(){
for(int k=1;k<=n;k++){
if(d[k]) continue;
q[++i]=k;
}
while(j<=i){
int c=q[j++];//队头结点
for(int k=h[c];k!=-1;k=ne[k]){
d[e[k]]--;
if(!d[e[k]]) q[++i]=e[k];
}
}
}
int main(){
cin>>n;
memset(h,-1,sizeof(h));
for(int a=1;a<=n;a++){
int b=-1;
while(b!=0){
scanf("%d",&b);
add(a,b);
}
}
topusort();
for(int i=0;i<n;i++) printf("%d ",q[i]);
return 0;
}