2017.1.13【初中部 】普及组模拟赛C组 money 最小花费 题解

原题：

http://172.16.0.132/junior/#contest/show/1363/1

题目描述：

在n个人中，某些人的银行账号之间可以互相转账。这些人之间转账的手续费各不相同。给定这些人之间转账时需要从转账金额里扣除百分之几的手续费，请问A最少需要多少钱使得转账后B收到100元。

输入：

第一行输入两个用空格隔开的正整数n和m，分别表示总人数和可以互相转账的人的对数。以下m行每行输入三个用空格隔开的正整数x; y; z，表示标号为x的人和标号为y的人之间互相转账需要扣除z%的手续费(z < 100)。最后一行输入两个用空格隔开的正整数A和B。数据保证A与B之间可以直接或间接地转账。

输出：

输出A使得B到账100元最少需要的总费用。精确到小数点后8位。

样例输入：

11

样例输出：

9

数据范围限制：

对于30%的数据， S<=10；
对于100%的数据， S <=1000。

提示：

样例说明:
取数字4和6，可以得到最大值(1 + 2) + (1 + 2 + 3) = 9。

分析：

某个人X 直接给另一个人Y 转账后，假如Y 收到了N元钱，手续费为M% ，那么X 花费了N／( 1 一M% ）元钱。假如X 和Y 之间可以直接转账且手续费为K％的话，我们连接一条边并赋权值为N/ ( 1 一K% ）。为了计算A 最少需要花费多少钱，我们需要找到一条路，使得B 到A 走过的路的权值乘积最小。由于权值都是大于1 的数（总是越乘越大），因此我们可以用Dijks加ra 算法。至于权值乘积最小为什么也能用最短路算法，这可以用Dijkstra 算法的原理来解释；

实现：

var
        max:real;
        n,m,i,j,x,y,z:longint;
        dis:array[0..2001]of real;
        v:array[0..2001]of boolean;
        a:array[0..2001,0..2001]of real;
begin
        assign(input,'money.in');reset(input);
        assign(output,'money.out');rewrite(output);
        readln(n,m);
        for i:=1 to m do
        begin
                read(x,y,z);
                a[x,y]:=(100-z)/100; a[y,x]:=a[x,y];
        end;
        readln(x,y);
        for i:=1 to n do dis[i]:=a[x,i];
        dis[x]:=1; v[x]:=true;
        for i:=1 to n-1 do
        begin
                max:=0;
                for j:=1 to n do
                        if not v[j]and(dis[j]>max) then
                        begin
                                max:=dis[j]; z:=j;
                        end;
                v[z]:=true;
                for j:=1 to n do
                        if not v[j]and(dis[z]*a[z,j]>dis[j]) then dis[j]:=dis[z]*a[z,j];
        end;
        writeln(100/dis[y]:0:8);
        close(input);close(output);
end.