... end; hien(t);end;3. 3. Thuật toán Kruskal{Cấu trúc lưu trữ khác của Đồ thị}Type canh = record u,v,ts: integer; end; dothi = array[1 200] of canh;var g: dothi; a: mang; n: integer; {so ... }procedure tao_dothi;var i,j: integer;begin for i:=1 to n do {Khởi tạo đồ thị rỗng} begin new(V[i]); V[i]^.info := 0; V[i]^.next := nil; end; for i:= 1 to n do for j:= 1 to n do if g[i,j] ... đỉnh I,J có tồn tại đường đi hay không?}procedure baodong;var i,j,k: integer;begin for i:= 1 to n do for j:= 1 to n do for k:= 1 to n do if (g[i,j] <> 0) or ((g[i,k]<>0)and...