首页 > 试题广场 >

const V = 100; var visi...

[填空题]
const
  V = 100;
var
  visited : array[1..V] of boolean;
  e : array[1..V, 1..V] of integer;
  n, m, ans, i, j, a, b, c : integer;
procedure dfs(x, len : integer);
var
  i : integer;
begin
  visited[x] := true;
  if len > ans then
    ans := len;
  for i := 1 to n do
    if (not visited[i]) and (e[x, i] <> -1) then
      dfs(i, len + e[x, i]);
  visited[x] := false;
end;
begin
  readln(n, m);
  for i := 1 to n do
    for j := 1 to n do
      e[i][j] := -1;
  for i := 1 to m do
  begin
    readln(a, b, c);
    e[a][b] := c;
    e[b][a] := c;
  end;
  for i := 1 to n do
    visited[i] := false;
  ans := 0;
  for i := 1 to n do
    dfs(i, 0);
  writeln(ans);
end.

输入:
4 6
1 2 10
2 3 20
3 4 30
4 1 40
1 3 50
2 4 60
输出:1

这道题你会答吗?花几分钟告诉大家答案吧!