• 最小生成树Kruskal——最优布线问题(codevs 1231) (可做Kruscal模板)


    题目描述 Description

    学校需要将n台计算机连接起来,不同的2台计算机之间的连接费用可能是不同的。为了节省费用,我们考虑采用间接数据传输结束,就是一台计算机可以间接地通过其他计算机实现和另外一台计算机连接。

    为了使得任意两台计算机之间都是连通的(不管是直接还是间接的),需要在若干台计算机之间用网线直接连接,现在想使得总的连接费用最省,让你编程计算这个最小的费用。

    输入描述 Input Description

    输入第一行为两个整数n,m(2<=n<=100000,2<=m<=100000),表示计算机总数,和可以互相建立连接的连接个数。接下来m行,每行三个整数a,b,c 表示在机器a和机器b之间建立连接的话费是c。(题目保证一定存在可行的连通方案, 数据中可能存在权值不一样的重边,但是保证没有自环)

    输出描述 Output Description

    输出只有一行一个整数,表示最省的总连接费用。

    样例输入 Sample Input

    3 3

    1 2 1

    1 3 2

    2 3 1

    样例输出 Sample Output

    2

    数据范围及提示 Data Size & Hint

    最终答案需要用long long类型来保存

    代码:Kruscal就是排序+并查集思路

    var aa,bb,t,n,m,i,j:longint;    sum:int64;
        f,a,b,c:array[1..100000] of longint;
    function find(x:longint):longint;
    begin
      if f[x]=x then exit(x)
        else find:=find(f[x]);
      f[x]:=find;
    end;
    procedure qsort(l,r: longint);  //快排
          var
             i,j,x,y: longint;
          begin
             i:=l;  j:=r;  x:=c[(l+r) div 2];
             repeat
               while c[i]<x do   inc(i);
               while x<c[j] do   dec(j);
               if not(i>j) then
                 begin
                    y:=a[i]; a[i]:=a[j]; a[j]:=y;
                    y:=b[i]; b[i]:=b[j]; b[j]:=y;
                    y:=c[i]; c[i]:=c[j]; c[j]:=y;
                    inc(i);  j:=j-1;
                 end;
             until i>j;
             if l<j then qsort(l,j);
             if i<r then qsort(i,r);
          end;

    procedure kruscal;    //Kruscal就是并查集思想
    var i,j:longint;
    begin
      for i:=1 to n do f[i]:=i;
      for i:=1 to m do
        begin
          a[i]:=find(a[i]);
          b[i]:=find(b[i]);
          if a[i]<>b[i] then
            begin
               f[a[i]]:=b[i];
               sum:=sum+c[i];
               inc(t);
               if t=n-1 then break;
            end;
        end;
    end;

    begin readln(n,m); for i:=1 to m do readln(a[i],b[i],c[i]); qsort(1,m); kruscal; writeln(sum); end.
  • 相关阅读:
    论 IntStream 和 for 循环的速度
    单链线性表的基本操作--创建,插入,删除,查看,打印
    Android中的异步处理方式
    Kotlin 集合变换与序列
    Kotlin Lazy延迟初始化
    协程及Kotlin协程
    Java 注解
    Android 事件传递机制进阶
    Java 异常
    Java 多线程及线程间通信(Synchronized和Volatile关键字)
  • 原文地址:https://www.cnblogs.com/zqzxwdm/p/4743855.html
Copyright © 2020-2023  润新知