计算图的传递闭包Procedure Longlink;VarT:array[1..maxn,1..maxn] of boolean;
计算图的传递闭包
Procedure Longlink;
Var
T:array[1..maxn,1..maxn] of boolean;
相关考题：
要用一个数组元素存放某班30人3门课的考试成绩(考试成绩保留1位小数), 下面哪个说明中的数组可以存放这些数据( )。 Avar s:array[1..3,1..30] of integer;Bvar s:array[‘a‘..‘c‘,1..30] of real;Cvar s:array[1..30,boolean] of real;Dvar s:array[1..30,‘a‘..‘c‘] of integer;
最小生成树A.Prim算法：procedure prim(v0:integer);varlowcost,closest:array[1..maxn] of integer;i,j,k,min:integer;
最短路径A.标号法求解单源点最短路径：vara:array[1..maxn,1..maxn] of integer;b:array[1..maxn] of integer; {b[i]指顶点i到源点的最短路径}mark:array[1..maxn] of boolean;procedure bhf;varbest,best_j:integer;
C. Dijkstra 算法：vara:array[1..maxn,1..maxn] of integer;b,pre:array[1..maxn] of integer; {pre[i]指最短路径上I的前驱结点}mark:array[1..maxn] of boolean;procedure dijkstra(v0:integer);
1 设A＝{1，2，3，4，5}，R是A上的二元关系， 且R＝{1，1，2，2，3，3，4，4，5，4}。 （1）判断R是否具有自反性，如果不具有自反性，请求出R的自反闭包r（R)； （2）判断R是否具有对称性，如果不具有对称性，请求出R的对称闭包s（R)； （3）判断R是否具有传递性，如果不具有传递性，请求出R的传递闭包t（R)；