[BZOJ1614][Usaco2007 Jan]Telephone Lines架设电话线

原创 2015年07月10日 23:14:10

[Usaco2007 Jan]Telephone Lines架设电话线

时间限制: 1 Sec 内存限制: 128 MB

题目描述

Farmer John打算将电话线引到自己的农场,但电信公司并不打算为他提供免费服务。于是,FJ必须为此向电信公司支付一定的费用。 FJ的农场周围分布着N(1 <= N <= 1,000)根按1..N顺次编号的废弃的电话线杆,任意两根电话线杆间都没有电话线相连。一共P(1 <= P <= 10,000)对电话线杆间可以拉电话线,其余的那些由于隔得太远而无法被连接。 第i对电话线杆的两个端点分别为A_i、B_i,它们间的距离为 L_i (1 <= L_i <= 1,000,000)。数据中保证每对{A_i,B_i}最多只出现1次。编号为1的电话线杆已经接入了全国的电话网络,整个农场的电话线全都连到了编号为N的电话线杆上。也就是说,FJ的任务仅仅是找一条将1号和N号电话线杆连起来的路径,其余的电话线杆并不一定要连入电话网络。 经过谈判,电信公司最终同意免费为FJ连结K(0 <= K < N)对由FJ指定的电话线杆。对于此外的那些电话线,FJ需要为它们付的费用,等于其中最长的电话线的长度(每根电话线仅连结一对电话线杆)。如果需要连结的电话线杆不超过 K对,那么FJ的总支出为0。 请你计算一下,FJ最少需要在电话线上花多少钱。

输入

第1行: 3个用空格隔开的整数:N,P,以及K
第2..P+1行: 第i+1行为3个用空格隔开的整数:A_i,B_i,L_i

输出

第1行: 输出1个整数,为FJ在这项工程上的最小支出。如果任务不可能完成, 输出-1

样例输入

5 7 1
1 2 5
3 1 4
2 4 8
3 2 3
5 2 9
3 4 7
4 5 6

样例输出

4

提示

输入说明:

一共有5根废弃的电话线杆。电话线杆1不能直接与电话线杆4、5相连。电话线杆5不能直接与电话线杆1、3相连。其余所有电话线杆间均可拉电话线。电信公司可以免费为FJ连结一对电话线杆。

输出说明:

FJ选择如下的连结方案:1->3;3->2;2->5,这3对电话线杆间需要的电话线的长度分别为4、3、9。FJ让电信公司提供那条长度为9的电话线,于是,他所需要购买的电话线的最大长度为4。

题解

  • 二分答案
  • 事实证明二分写不好就是死路一条QAQAQ

代码

  • 前星存法
var
 p,dist:array[0..10000]of longint;
 t:array[0..50000]of longint;
 w:array[0..90000,1..3]of longint;
 i,j:longint;
 n,m,k,s:longint;
 a,b,c,l,r,mid,head,tail,x,y,tt,pp:longint;
function spfa(a:longint):longint;
var
 i,j:longint;
begin
 for i:=2 to n do
  dist[i]:=100000;
 head:=1; tail:=2; t[1]:=1; p[1]:=1;
 while head<tail do
  begin
   x:=head; y:=tail;
   for i:=head to tail-1 do
    begin
     tt:=w[t[i],3];
     while tt<>0 do
      begin
       if w[tt,2]<=a then pp:=0 else pp:=1;
       if dist[t[i]]+pp<dist[w[tt,1]]
       then
        begin
         dist[w[tt,1]]:=dist[t[i]]+pp;
         if p[w[tt,1]]=0
         then begin t[y]:=w[tt,1]; inc(y); end;
        end;
       tt:=w[tt,3];
      end;
     inc(x);
     p[t[i]]:=0;
    end;
   head:=x; tail:=y;
  end;
 if dist[n]<=s then exit(1) else exit(0);
end;

begin
 readln(n,m,s); k:=n+1;
 for i:=1 to m do
  begin
   readln(a,b,c);
   w[k,1]:=b;
   w[k,2]:=c;
   if w[a,3]=0
   then w[a,3]:=k
   else w[w[a,1],3]:=k;
   w[a,1]:=k;
   inc(k);
   w[k,1]:=a;
   w[k,2]:=c;
   if w[b,3]=0
   then w[b,3]:=k
   else w[w[b,1],3]:=k;
   w[b,1]:=k;
   inc(k);
   if c>r then r:=c;
  end;
 l:=0;
 while l<r do
  begin
   mid:=(l+r)div 2;
   if spfa(mid)=1
   then r:=mid
   else l:=mid+1;
  end;
 if spfa(l)=1
 then writeln(l)
 else writeln(-1);
end.
  • 邻接矩阵存法
var
 p,dist:array[0..10000]of longint;
 t:array[0..50000]of longint;
 w:array[0..1000,1..1000]of longint;
 i,j:longint;
 n,m,k:longint;
 a,b,l,r,mid,head,tail,x,y,tt:longint;
function spfa(a:longint):longint;
var
 i,j:longint;
begin
 for i:=2 to n do
  dist[i]:=10000000;
 p[1]:=1; head:=1; tail:=2; t[1]:=1;
 while head<tail do
  begin
   x:=head; y:=tail;
   for i:=x to y-1 do
    begin
     for j:=1 to n do
      begin
       if (j=t[i])or(w[t[i],j]=0) then continue;
       if w[t[i],j]<=a then tt:=0 else tt:=1;
       if dist[t[i]]+tt<dist[j] then
       begin
        dist[j]:=dist[t[i]]+tt;
        if p[j]=0 then begin t[y]:=j; inc(y); end;
       end;
      end;
     inc(x); p[t[i]]:=0;
    end;
   head:=x; tail:=y;
  end;
 if dist[n]<=k then exit(1) else exit(0);
end;

begin
 readln(n,m,k);
 for i:=1 to m do
  begin
   readln(a,b,w[a,b]);
   w[b,a]:=w[a,b];
   if w[b,a]>r then r:=w[a,b];
  end;
 l:=0;
 while l<r do
  begin
   mid:=(l+r)div 2;
   if spfa(mid)=1
   then r:=mid
   else l:=mid+1;
  end;
 if spfa(l)=1
 then writeln(l)
 else writeln(-1);
end.

版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

BZOJ 1614: [Usaco2007 Jan]Telephone Lines架设电话线 二分答案 最短路

最短路 二分答案

【BZOJ 1614】: [Usaco2007 Jan]Telephone Lines架设电话线 spfa+二分

题目:http://www.lydsy.com/JudgeOnline/problem.php?id=16141614: [Usaco2007 Jan]Telephone Lines架设电话线 Ti...
  • ALPS233
  • ALPS233
  • 2016年05月17日 10:31
  • 466

BZOJ [Usaco2007 Jan]Telephone Lines架设电话线(POJ 3662)

题目描述 Farmer John打算将电话线引到自己的农场,但电信公司并不打算为他提供免费服务。于是,FJ必须为此向电信公司支付一定的费用。     FJ的农场周围分布着N(1 根按1..N顺...

Cpp环境【POJ3622】【Usaco2008 Jan Silver】【Vijos1874】Telephone Lines架设电话线

Description 【问题描述】 Farmer John wants to set up a telephone line at his farm. Unfortunately, the pho...

[USACO Jan08][BZOJ 1614][COGS 147]架设电话线

[USACO jan2008][BZOJ 1614] 架设电话线题解

[USACO08JAN]电话线Telephone Lines 洛谷P1948

有思路,有源码,不防偷看XD

洛谷 P1948 [USACO08JAN]电话线Telephone Lines

二分+spfa
  • Rlt1296
  • Rlt1296
  • 2016年11月18日 18:54
  • 211

[BZOJ1705] [Usaco2007 Nov]Telephone Wire 架设电话线

DP+辅助数组优化

洛谷 P1948 [USACO08JAN]电话线Telephone Lines【NOIP模拟笨笨的电话线】

[二分,spfa chenck] 题目描述Farmer John wants to set up a telephone line at his farm. Unfortunately, the p...
  • lfrun
  • lfrun
  • 2016年10月27日 08:26
  • 221

usaco 2008 January Telephone Lines 架设电话线 题解

题目大意:有N个点(N
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:[BZOJ1614][Usaco2007 Jan]Telephone Lines架设电话线
举报原因:
原因补充:

(最多只允许输入30个字)