BZOJ 2200 道路与航线 (算竞进阶习题)

时间:2023-03-09 00:13:53
BZOJ 2200 道路与航线 (算竞进阶习题)

dijkstra + 拓扑排序

这道题有负权边,但是卡了spfa,所以我们应该观察题目性质。

负权边一定是单向的,且不构成环,那么我们考虑先将正权边连上。然后dfs一次找到所有正权边构成的联通块,将他们看成点,那么负权边和这些点就构成了一张DAG。

对于DAG,我们可以拓扑排序,在排序的过程中,我们把入度为0的联通块里的所有点松弛一次,如果访问到联通块外的点,就让其入度减1,然后重复在拓扑排序中跑最短路的过程即可得到答案。

输出答案的时候注意一个坑,因为存在负权边,当有的点不能从起点达到的时候,INF可能被负权边松弛。。

#include <bits/stdc++.h>
#define INF 0x3f3f3f3f
#define full(a, b) memset(a, b, sizeof a)
using namespace std;
typedef long long ll;
inline int lowbit(int x){ return x & (-x); }
inline int read(){
int X = 0, w = 0; char ch = 0;
while(!isdigit(ch)) { w |= ch == '-'; ch = getchar(); }
while(isdigit(ch)) X = (X << 3) + (X << 1) + (ch ^ 48), ch = getchar();
return w ? -X : X;
}
inline int gcd(int a, int b){ return a % b ? gcd(b, a % b) : b; }
inline int lcm(int a, int b){ return a / gcd(a, b) * b; }
template<typename T>
inline T max(T x, T y, T z){ return max(max(x, y), z); }
template<typename T>
inline T min(T x, T y, T z){ return min(min(x, y), z); }
template<typename A, typename B, typename C>
inline A fpow(A x, B p, C lyd){
A ans = 1;
for(; p; p >>= 1, x = 1LL * x * x % lyd)if(p & 1)ans = 1LL * x * ans % lyd;
return ans;
} const int N = 40005;
int t, r, p, s, cnt, tot, head[N], c[N], d[N], dist[N];
bool vis[N];
struct Edge { int v, next, w; } edge[N<<5]; void addEdge(int a, int b, int w){
edge[cnt].v = b, edge[cnt].w = w, edge[cnt].next = head[a], head[a] = cnt ++;
} void dfs(int s){
vis[s] = true;
c[s] = tot;
for(int i = head[s]; i != -1; i = edge[i].next){
int u = edge[i].v;
if(vis[u]) continue;
dfs(u);
}
} void topSort(){
full(dist, INF);
queue<int> q;
for(int i = 1; i <= tot; i ++){
if(!d[i]) q.push(i);
}
dist[s] = 0;
while(!q.empty()){
full(vis, false);
int cur = q.front(); q.pop();
priority_queue< pair<int, int>, vector< pair<int, int> >, greater< pair<int, int> > > pq;
for(int i = 1; i <= t; i ++){
if(c[i] == cur) pq.push(make_pair(dist[i], i));
}
while(!pq.empty()){
int f = pq.top().second, dis = pq.top().first; pq.pop();
if(vis[f]) continue;
vis[f] = true;
for(int i = head[f]; i != -1; i = edge[i].next){
int u = edge[i].v;
if(dist[u] > dis + edge[i].w){
dist[u] = dis + edge[i].w;
if(c[u] == c[f]) pq.push(make_pair(dist[u], u));
}
if(c[u] != c[f]){
if(!--d[c[u]]) q.push(c[u]);
}
}
}
}
} int main(){ full(head, -1);
t = read(), r = read(), p = read(), s = read();
for(int i = 0; i < r; i ++){
int u = read(), v = read(), c = read();
addEdge(u, v, c), addEdge(v, u, c);
}
for(int i = 1; i <= t; i ++){
if(!vis[i]) ++tot, dfs(i);
}
for(int i = 0; i < p; i ++){
int u = read(), v = read(), c = read();
addEdge(u, v, c);
}
for(int cur = 1; cur <= t; cur ++){
for(int i = head[cur]; i != -1; i = edge[i].next){
int u = edge[i].v;
if(c[u] != c[cur]) d[c[u]] ++;
}
}
topSort();
for(int i = 1; i <= t; i ++){
printf(dist[i] >= 100000000 ? "NO PATH\n" : "%d\n", dist[i]);
}
return 0;
}