1682: [Usaco2005 Mar]Out of Hay 干草危机
1682: [Usaco2005 Mar]Out of Hay 干草危機
Time Limit:?5 Sec??Memory Limit:?64 MBSubmit:?391??Solved:?258
[Submit][Status]
Description
The cows have run out of hay, a horrible event that must be remedied immediately. Bessie intends to visit the other farms to survey their hay situation. There are N (2 <= N <= 2,000) farms (numbered 1..N); Bessie starts at Farm 1. She'll traverse some or all of the M (1 <= M <= 10,000) two-way roads whose length does not exceed 1,000,000,000 that connect the farms. Some farms may be multiply connected with different length roads. All farms are connected one way or another to Farm 1. Bessie is trying to decide how large a waterskin she will need. She knows that she needs one ounce of water for each unit of length of a road. Since she can get more water at each farm, she's only concerned about the length of the longest road. Of course, she plans her route between farms such that she minimizes the amount of water she must carry. Help Bessie know the largest amount of water she will ever have to carry: what is the length of longest road she'll have to travel between any two farms, presuming she chooses routes that minimize that number? This means, of course, that she might backtrack over a road in order to minimize the length of the longest road she'll have to traverse.
牛們干草要用完了!貝茜打算去勘查災情. 有N(2≤N≤2000)個農(nóng)場,M(≤M≤10000)條雙向道路連接著它們,長度不超過109.每一個農(nóng)場均與農(nóng)場1連通.貝茜要走遍每一個農(nóng)場.她每走一單位長的路,就要消耗一單位的水.從一個農(nóng)場走到另一個農(nóng)場,她就要帶上數(shù)量上等于路長的水.請幫她確定最小的水箱容量.也就是說,確定某一種方案,使走遍所有農(nóng)場通過的最長道路的長度最小,必要時她可以走回頭路.Input
* Line 1: Two space-separated integers, N and M. * Lines 2..1+M: Line i+1 contains three space-separated integers, A_i, B_i, and L_i, describing a road from A_i to B_i of length L_i.
第1行輸入兩個整數(shù)N和M;接下來M行,每行輸入三個整數(shù),表示一條道路的起點終點和長度.Output
* Line 1: A single integer that is the length of the longest road required to be traversed.
輸出一個整數(shù),表示在路線上最長道路的最小值.Sample Input
3 31 2 23
2 3 1000
1 3 43
Sample Output
43由1到達2,需要經(jīng)過長度23的道路;回到1再到3,通過長度43的道路.最長道路為43
HINT
Source
Silver
?題解:既然題目說了所有點均與點1聯(lián)通(phile:廢話,那不就是聯(lián)通無向圖啊),那么顯(讀xian2,我們數(shù)學老師口頭禪)然這個問題成了最小生成樹,然后只要求出最小生成樹最大邊的值就Accept啦。。
?
1 var 2 i,j,k,l,m,n:longint; 3 c:array[0..3000] of longint; 4 a:array[0..15000,1..3] of longint; 5 procedure swap(var x,y:longint); 6 var z:longint; 7 begin 8 z:=x;x:=y;y:=z; 9 end; 10 procedure sort(l,r:longint); 11 var i,j,x,y:longint; 12 begin 13 i:=l;j:=r; 14 x:=a[(l+r) div 2,3]; 15 repeat 16 while a[i,3]<x do inc(i); 17 while a[j,3]>x do dec(j); 18 if i<=j then 19 begin 20 swap(a[i,1],a[j,1]); 21 swap(a[i,2],a[j,2]); 22 swap(a[i,3],a[j,3]); 23 inc(i);dec(j); 24 end; 25 until i>j; 26 if l<j then sort(l,j); 27 if i<r then sort(i,r); 28 end; 29 function getfat(x:longint):longint; 30 begin 31 while x<>c[x] do x:=c[x]; 32 getfat:=x; 33 end; 34 function tog(x,y:longint):boolean; 35 begin 36 exit(getfat(x)=getfat(y)); 37 end; 38 procedure merge(x,y:longint); 39 begin 40 c[getfat(x)]:=getfat(y); 41 end; 42 begin 43 readln(n,m); 44 for i:=1 to m do 45 readln(a[i,1],a[i,2],a[i,3]); 46 for i:=1 to n do c[i]:=i; 47 sort(1,m); 48 j:=1; 49 l:=0; 50 for i:=1 to n-1 do 51 begin 52 while tog(a[j,1],a[j,2]) do inc(j); 53 if a[j,3]>l then l:=a[j,3]; 54 merge(a[j,1],a[j,2]); 55 end; 56 writeln(l); 57 end. 58?
轉(zhuǎn)載于:https://www.cnblogs.com/HansBug/p/4168408.html
總結
以上是生活随笔為你收集整理的1682: [Usaco2005 Mar]Out of Hay 干草危机的全部內(nèi)容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: W3 Total Cache+Hackl
- 下一篇: override render 方法