Description
设有一棵二叉树（如右图）。其中，圈中的数字表示结点中居民的人口。圈边上数字表示结点编号，现在要求在某个结点上建立一个医院，使所有居民所走的路程之和为最小，同时约定，相邻接点之间的距离为1。如 右图中，若医院建在： 1处，则距离和=4+12+2*20+2*40=136 3处，则距离和=4*2+13+20+40=81 ………….
Input
第一行一个整数n，表示树的结点数。（n<=100） 接下来的n行每行描述了一个结点的状况，包含三个整数，整数之间用空格（一个或多个）分隔，其中：第一个数为居民人口数；第二个数为左链接，为0表示无链接；第三个数为右链接。
Output
一个整数，表示最小距离和。
Sample Input
5 13 2 3 4 0 0 12 4 5 20 0 0 40 0 0 Sample Output
81
题解：
标记距离为1，算距离时乘以人数。
代码：
var
a:
array[
0..
200,
0..
200]
of longint;
b:
array[
1..
100]
of longint;
n,x,y,i,j,k,sum:longint;
begin
readln(n);
for i:=
1 to n
do
for j:=
1 to n
do
a[i,j]:=
100000000;
for i:=
1 to n
do
begin
readln(b[i],x,y);
a[i,x]:=
1;
a[x,i]:=
1;
a[i,y]:=
1;
a[y,i]:=
1;
end;
for k:=
1 to n
do
for i:=
1 to n
do
for j:=
1 to n
do
if (i<>j)
and(i<>k)
and(j<>k)
then
if a[i,j]>a[i,k]+a[k,j]
then
a[i,j]:=a[i,k]+a[k,j];
sum:=
1000000;
for i:=
1 to n
do
begin
x:=
0;
for j:=
1 to n
do
if i<>j
then
x:=b[j]*a[i,j]+x;
if x<sum
then sum:=x;
end;
writeln(sum);
end.
转载请注明原文地址: https://ju.6miu.com/read-968180.html
