jzoj 1391. 【2012.02.25普及组】危险系数

发布于 2019-03-18  6 次阅读


 

题目描述

    FJ在一条船上,海上有N(1<=N<=100)岛,编号为1..N,现在他的任务是按照一个给定访问次序A_1,A_2,….A_M去探索这M(2<=M<=10,000)个岛屿,已经知道任意两个岛屿之间的危险系数,让你找出一个探索序列,只需满足你的探索序列包含给定的A_1..A_M这个序列就可以(不一定要连续),使得总的危险系数最小。

 

输入

第1行: 两个数, N 和 M

第 2..M+1行: 第i+1行表示给定的序列中第i个岛屿A_i

第M+2..N+M+1行:每行N个整数,表示岛屿之间的危险系数,对角线上一定是0。

 

输出

输出满足要求的最小危险系数

思路

 

样例中的图是一个无向图。。。但是其实并不是,读入完以后用Floyd枚举每一个点,但是另外的那个节点k要放在外循环中

var
  f:array[0..1000,0..1000] of longint;
  i,j,k,n,m,s:longint;
  a:array[0..100000] of longint;
begin
  readln(n,m);
  for i:=1 to m do
    readln(a[i]);
  for i:=1 to n do
  begin
    for j:=1 to n do
      read(f[i,j]);
    readln;
  end;
  for k:=1 to n do
    for i:=1 to n do
      for j:=1 to n do
        if (i<>k) and (i<>j) and (k<>j) and (f[i,k]+f[k,j]


 

 

]]>


「墨泼三千烟火,许你一世迷离」