【BZOJ】2152: 聪聪可可（点分治）

#include <cstdio>
#include <cstring>
#include <cmath>
#include <string>
#include <iostream>
#include <algorithm>
#include <queue>
#include <set>
#include <map>
using namespace std;
typedef long long ll;
#define rep(i, n) for(int i=0; i<(n); ++i)
#define for1(i,a,n) for(int i=(a);i<=(n);++i)
#define for2(i,a,n) for(int i=(a);i<(n);++i)
#define for3(i,a,n) for(int i=(a);i>=(n);--i)
#define for4(i,a,n) for(int i=(a);i>(n);--i)
#define CC(i,a) memset(i,a,sizeof(i))
#define read(a) a=getint()
#define print(a) printf("%d", a)
#define dbg(x) cout << (#x) << " = " << (x) << endl
#define error(x) (!(x)?puts("error"):0)
#define rdm(x, i) for(int i=ihead[x]; i; i=e[i].next)
inline const int getint() { int r=0, k=1; char c=getchar(); for(; c<‘0‘||c>‘9‘; c=getchar()) if(c==‘-‘) k=-1; for(; c>=‘0‘&&c<=‘9‘; c=getchar()) r=r*10+c-‘0‘; return k*r; }

int gcd(int a, int b) { return b?gcd(b, a%b):a; }
const int N=20005, oo=~0u>>1;
int ihead[N], cnt;
struct dat { int next, to, w; }e[N<<1];
void add(int u, int v, int w) {
	e[++cnt].next=ihead[u]; ihead[u]=cnt; e[cnt].to=v; e[cnt].w=w;
	e[++cnt].next=ihead[v]; ihead[v]=cnt; e[cnt].to=u; e[cnt].w=w;
}
int n, ans, root;
int vis[N], d[N], dep[N], cdep, sz[N], f[N];
void getroot(int x, int fa, int sum) {
	sz[x]=1; f[x]=0; int y;
	rdm(x, i) if(!vis[y=e[i].to] && e[i].to!=fa) {
		getroot(y, x, sum);
		sz[x]+=sz[y];
		f[x]=max(f[x], sz[y]);
	}
	f[x]=max(f[x], sum-f[x]);
	if(f[x]<f[root]) root=x;
}
void getdep(int x, int fa) {
	dep[++cdep]=d[x]; int y;
	rdm(x, i) if(!vis[y=e[i].to] && e[i].to!=fa) {
		d[y]=d[x]+e[i].w;
		getdep(y, x);
	}
}
int cal(int x, int last=0) {
	static int c[3];
	cdep=0; d[x]=last;
	getdep(x, -1);
	CC(c, 0);
	for1(i, 1, cdep) ++c[dep[i]%3];
	return c[0]*c[0]+((c[1]*c[2])<<1);
}
void dfs(int x, int sum) {
	vis[x]=1;
	ans+=cal(x); int y; //printf("root:%d cal:%d\n", x, cal(x)); for1(i, 1, cdep) printf("%d ", dep[i]); puts("");
	rdm(x, i) if(!vis[y=e[i].to]) {
		ans-=cal(y, e[i].w); //dbg(cal(y, e[i].w));
		int s=sz[y]>sz[x]?sum-sz[x]:sz[y];
		root=0; getroot(y, x, s);
		dfs(root, s);
	}
}
int main() {
	f[0]=oo;
	read(n);
	rep(i, n-1) { int u=getint(), v=getint(), w=getint()%3; add(u, v, w); }
	getroot((n+1)>>1, -1, n);
	dfs(root, n); //dbg(ans);
	int all=n*n, gg=gcd(all, ans);
	printf("%d/%d\n", ans/gg, all/gg);
	return 0;
}