洛谷2469星际竞速

题目描述
10年一度的银河系赛车大赛又要开始了。作为全银河最盛大的活动之一，夺得这个项目的冠军无疑是很多人的梦想，来自杰森座α星的悠悠也是其中之一。

赛车大赛的赛场由N颗行星和M条双向星际航路构成，其中每颗行星都有一个不同的引力值。大赛要求车手们从一颗与这N颗行星之间没有任何航路的天体出发，访问这N颗行星每颗恰好一次，首先完成这一目标的人获得胜利。

由于赛制非常开放，很多人驾驶着千奇百怪的自制赛车来参赛。这次悠悠驾驶的赛车名为超能电驴，这是一部凝聚了全银河最尖端科技结晶的梦幻赛车。作为最高科技的产物，超能电驴有两种移动模式：高速航行模式和能力爆发模式。在高速航行模式下，超能电驴会展开反物质引擎，以数倍于光速的速度沿星际航路高速航行。在能力爆发模式下，超能电驴脱离时空的束缚，使用超能力进行空间跳跃——在经过一段时间的定位之后，它能瞬间移动到任意一个行星。

天不遂人愿，在比赛的前一天，超能电驴在一场离子风暴中不幸受损，机能出现了一些障碍：在使用高速航行模式的时候，只能由每个星球飞往引力比它大的星球，否则赛车就会发生爆炸。

尽管心爱的赛车出了问题，但是悠悠仍然坚信自己可以取得胜利。他找到了全银河最聪明的贤者——你，请你为他安排一条比赛的方案，使得他能够用最少的时间完成比赛。

输入输出格式
输入格式：
输入文件starrace.in的第一行是两个正整数N, M。

第二行N个数A1~AN，其中Ai表示使用能力爆发模式到达行星i所需的定位时间。

接下来M行，每行3个正整数ui, vi, wi，表示在编号为ui和vi的行星之间存在一条需要航行wi时间的星际航路。

输入数据已经按引力值排序，也就是编号小的行星引力值一定小，且不会有两颗行星引力值相同。

输出格式：
输出文件starrace.out仅包含一个正整数，表示完成比赛所需的最少时间。

输入输出样例
输入样例#1：
3 3
1 100 100
2 1 10
1 3 1
2 3 1
输出样例#1：
12
输入样例#2：
3 3
1 2 3
1 2 100
1 3 100
2 3 100
输出样例#2：
6
输入样例#3：
4 5
100 1000 10 100
1 2 100
2 3 100
4 3 100
1 3 20
2 4 20
输出样例#3：
230
说明
样例一说明：先使用能力爆发模式到行星1，花费时间1。

然后切换到高速航行模式，航行到行星2，花费时间10。

之后继续航行到行星3完成比赛，花费时间1。

虽然看起来从行星1到行星3再到行星2更优，但我们却不能那样做，因为那会导致超能电驴爆炸。

【数据规模和约定】

对于30%的数据N≤20，M≤50；

对于70%的数据N≤200，M≤4000；

对于100%的数据N≤800，M≤15000。输入数据中的任何数
都不会超过106。
输入数据保证任意两颗行星之间至多存在一条航道，且不会
存在某颗行星到自己的航道。

满分代码：
#include<cmath>
#include<cstdio>
#include<cstdlib>
#include<cstring>
#include<iostream>
#include<algorithm>
using namespace std;
inline void Scan(int &x)
{
	char c;
	while(!isdigit(c = getchar()));
	x = c - '0';
	while(isdigit(c = getchar())) x = x * 10 + c - '0';
}
const int maxn = 2e3 + 1;
const int maxm = 3e5 + 1;
const int inf = 2e9 + 1;
int n, m;
int ans;
int len, num;
int s, t, cen, nors, nort, sups, supt;
int nex[maxm], fir[maxn], ver[maxm], con[maxm], pri[maxm];
int que[maxm], dis[maxn];
bool vis[maxn];
int du[maxn];
inline void Init()
{
	len = 1;
	num = n << 1;
	cen = ++num;
	sups = ++num;
	supt = ++num;
}
inline void Ins(int x, int y, int c, int w)
{
	nex[++len] = fir[x];
	fir[x] = len;
	ver[len] = y;
	con[len] = c;
	pri[len] = w;
}
inline void Add(int x, int y, int c, int w)
{
	Ins(x, y, c, w);
	Ins(y, x, 0, -w);
}
inline void Put(int x, int y, int l, int r, int w)
{
	du[x] -= l, du[y] += l;
	if(l == r) return;
	Add(x, y, r - l, w);
}
inline bool Spfa()
{
	int head = 0, tail = 1;
	for(int i = 1; i <= num; ++i)
		dis[i] = inf, vis[i] = false;
	que[tail] = s;
	vis[s] = true;
	dis[s] = 0;
	while(head < tail)
	{
		int u = que[++head];
		if(head == maxm) head = 0;
		for(int i = fir[u]; i; i = nex[i])
		{
			if(!con[i]) continue;
			int v = ver[i];
			if(dis[v] > dis[u] + pri[i])
			{
				dis[v] = dis[u] + pri[i];
				if(!vis[v])
				{
					vis[v] = true;
					que[++tail] = v;
					if(tail == maxm) tail = 0;
				}
			}
		}
		vis[u] = false;
	}
	return dis[t] < inf;
}
int Dinic(int u, int flow)
{
	vis[u] = true;
	if(u == t) return flow;
	int gone = 0;
	for(int i = fir[u]; i; i = nex[i])
	{
		if(!con[i]) continue;
		int v = ver[i];
		if(vis[v] || dis[v] != dis[u] + pri[i]) continue;
		int go = Dinic(v, min(con[i], flow - gone));
		if(go)
		{
			con[i] -= go;
			con[i ^ 1] += go;
			gone += go;
			ans += go * pri[i];
			if(gone == flow) break;
		}
	}
	return gone;
}
inline int Flow(int x, int y)
{
	s = x, t = y;
	ans = 0;
	while(Spfa()) Dinic(s, inf);
	return ans;
}
int main()
{
	Scan(n), Scan(m);
	Init();
	int x, y, v;
	for(int i = 1; i <= n; ++i)
	{
		Scan(v);
		Add(cen, i, 1, v);
		Add(i + n, cen, 1, 0);
		Put(i, i + n, 1, 1, 0);
	}
	for(int i = 1; i <= m; ++i)
	{
		Scan(x), Scan(y), Scan(v);
		if(x == y) continue;
		if(x > y) swap(x, y);
		Add(x + n, y, 1, v);
	}
	for(int i = 1; i <= num; ++i)
	{
		if(du[i] > 0) Add(sups, i, du[i], 0);
		if(du[i] < 0) Add(i, supt, -du[i], 0);
	}
	ans = Flow(sups, supt);
	printf("%d", ans);
}
``