題目描述

在n個人中，某些人的銀行賬號之間可以互相轉賬。這些人之間轉賬的手續費各不相同。給定這些人之間轉賬時需要從轉賬金額里扣除百分之幾的手續費，請問A最少需要多少錢使得轉賬后B收到100元。

輸入輸出格式

輸入格式：
第一行輸入兩個正整數n,m，分別表示總人數和可以互相轉賬的人的對數。

以下m行每行輸入三個正整數x,y,z，表示標號為x的人和標號為y的人之間互相轉賬需要扣除z%的手續費 (z<100)。

最后一行輸入兩個正整數A,B。數據保證A與B之間可以直接或間接地轉賬。

輸出格式：
輸出A使得B到賬100元最少需要的總費用。精確到小數點后8位。

輸入輸出樣例

輸入樣例#1：
3 3
1 2 1
2 3 2
1 3 3
1 3
輸出樣例#1：
103.07153164
說明

1<=n<=2000

程序：

var next,ls,s,t,p:array[0..500001]of longint; w:array[0..500001]of real; d:array[0..3000]of real; v:array[0..3000]of boolean; n,m,a,b,i,j:longint; ans:real; procedure spfa; var head,tail,i:longint; beginhead:=0;tail:=1;d[a]:=1;v[a]:=true;p[1]:=a;while head<tail dobegininc(head);i:=ls[p[head]];while i>0 dobeginif d[s[i]]*w[i]>d[t[i]] thenbegind[t[i]]:=d[s[i]]*w[i];if v[t[i]]=false thenbeginv[t[i]]:=true;inc(tail);p[tail]:=t[i];end;end;i:=next[i];end;v[p[head]]:=false;end; end;beginfillchar(next,sizeof(next),0);fillchar(ls,sizeof(ls),0);readln(n,m);i:=0;for j:=1 to m dobegininc(i);readln(s[i],t[i],w[i]);w[i]:=1-w[i]/100;next[i]:=ls[s[i]];ls[s[i]]:=i;inc(i);s[i]:=t[i-1];t[i]:=s[i-1];w[i]:=w[i-1];next[i]:=ls[s[i]];ls[s[i]]:=i;end;read(a,b);for i:=1 to n dobegind[i]:=-1;v[i]:=false;end;spfa;write(100/d[b]:0:8); end.

轉載于:https://www.cnblogs.com/YYC-0304/p/9500054.html

總結

以上是生活随笔為你收集整理的最小花费的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。