数据结构学习笔记 --- 图邻接表

分类：VB作者：编程之家用户

1.图（邻接表）

#include "ds.h"

// 图的数组(邻接矩阵)存储表示

#define 	INFINITY		INT_MAX		// 用整型最大值代替∞
#define 	MAX_VERTEX_NUM	20			// 最大顶点个数
#define 	MAX_NAME 		5 			// 顶点字符串的最大长度+1
#define 	MAX_INFO 		20 			// 相关信息字符串的最大长度+1
typedef 	int 			VRType; 	// 顶点关系类型
typedef 	int 			InfoType; 	// 网的权值类型
typedef 	char 			VertexType[MAX_NAME]; // 顶点类型为字符串
enum		GraphKind{DG,DN,UDG,UDN};// {有向图,有向网,无向图,无向网}

struct ElemType
{
	int 		adjvex; 	// 该弧所指向的顶点的位置
	InfoType	*info;		// 网的权值指针
};

struct ArcNode
{
	ElemType	data;		// 除指针以外的部分都属于ElemType
	ArcNode		*nextarc;	// 指向下一条弧的指针
};	// 表结点

typedef struct
{
	VertexType	data;		// 顶点信息
	ArcNode		*firstarc;	// 第一个表结点的地址，指向第一条依附该顶点的弧的指针
}VNode,AdjList[MAX_VERTEX_NUM];// 头结点

struct ALGraph
{
	AdjList 	vertices;
	int			vexnum,arcnum;	// 图的当前顶点数和弧数
	int 		kind;			// 图的种类标志
};

Boolean visited[MAX_VERTEX_NUM]; // 访问标志数组(全局量)
void(*VisitFunc)(VertexType); // 函数变量

#define 	LNode 		ArcNode		// 加，定义单链表的结点类型是图的表结点的类型
#define		next		nextarc		// 加，定义单链表结点的指针域是表结点指向下一条弧的指针域
typedef 	ArcNode*	LinkList;	// 加，定义指向单链表结点的指针是指向图的表结点的指针

// 不带头结点的单链表基本操作
#define DestroyList ClearList // DestroyList()和ClearList()的操作是一样的
 void InitList(LinkList &L)
 { // 操作结果：构造一个空的线性表L
   L=NULL; // 指针为空
 }

 void ClearList(LinkList &L)
 { // 初始条件：线性表L已存在。操作结果：将L重置为空表
   LinkList p;
   while(L) // L不空
   {
     p=L; // p指向首元结点
     L=L->next; // L指向第2个结点(新首元结点)
     free(p); // 释放首元结点
   }
 }

 Status ListEmpty(LinkList L)
 { // 初始条件：线性表L已存在。操作结果：若L为空表，则返回TRUE，否则返回FALSE
   if(L)
     return FALSE;
   else
     return TRUE;
 }

 int ListLength(LinkList L)
 { // 初始条件：线性表L已存在。操作结果：返回L中数据元素个数
   int i=0;
   LinkList p=L;
   while(p) // p指向结点(没到表尾)
   {
     p=p->next; // p指向下一个结点
     i++;
   }
   return i;
 }

 Status GetElem(LinkList L,int i,ElemType &e)
 { // L为不带头结点的单链表的头指针。当第i个元素存在时，其值赋给e并返回OK，否则返回ERROR
   int j=1;
   LinkList p=L;
   if(i<1) // i值不合法
     return ERROR;
   while(j<i&&p) // 没到第i个元素，也没到表尾
   {
     j++;
     p=p->next;
   }
   if(j==i) // 存在第i个元素
   {
     e=p->data;
     return OK;
   }
   else
     return ERROR;
 }

 int LocateElem(LinkList L,ElemType e,Status(*compare)(ElemType,ElemType))
 { // 初始条件：线性表L已存在，compare()是数据元素判定函数(满足为1，否则为0)
   // 操作结果：返回L中第1个与e满足关系compare()的数据元素的位序。
   //           若这样的数据元素不存在，则返回值为0
   int i=0;
   LinkList p=L;
   while(p)
   {
     i++;
     if(compare(p->data,e)) // 找到这样的数据元素
       return i;
     p=p->next;
   }
   return 0;
 }

 Status ListInsert(LinkList &L,ElemType e)
 { // 在不带头结点的单链线性表L中第i个位置之前插入元素e
   int j=1;
   LinkList p=L,s;
   if(i<1) // i值不合法
     return ERROR;
   s=(LinkList)malloc(sizeof(LNode)); // 生成新结点
   s->data=e; // 给s的data域赋值
   if(i==1) // 插在表头
   {
     s->next=L;
     L=s; // 改变L
   }
   else
   { // 插在表的其余处
     while(p&&j<i-1) // 寻找第i-1个结点
     {
       p=p->next;
       j++;
     }
     if(!p) // i大于表长+1
       return ERROR;
     s->next=p->next;
     p->next=s;
   }
   return OK;
 }

 Status ListDelete(LinkList &L,ElemType &e)
 { // 在不带头结点的单链线性表L中，删除第i个元素，并由e返回其值
   int j=1;
   LinkList p=L,q;
   if(i==1) // 删除第1个结点
   {
     L=p->next; // L由第2个结点开始
     e=p->data;
     free(p); // 删除并释放第1个结点
   }
   else
   {
     while(p->next&&j<i-1) // 寻找第i个结点，并令p指向其前趋
     {
       p=p->next;
       j++;
     }
     if(!p->next||j>i-1) // 删除位置不合理
       return ERROR;
     q=p->next; // 删除并释放结点
     p->next=q->next;
     e=q->data;
     free(q);
   }
   return OK;
 }
 
 void ListTraverse(LinkList L,void(*vi)(ElemType))
 { // 初始条件：线性表L已存在。操作结果：依次对L的每个数据元素调用函数vi()
   LinkList p=L;
   while(p)
   {
     vi(p->data);
     p=p->next;
   }
   printf("\n");
 }
 
LinkList Point(LinkList L,Status(*equal)(ElemType,ElemType),LinkList &p)
 { // 查找表L中满足条件的结点。如找到，返回指向该结点的指针，p指向该结点的前驱(若该结点是
   // 首元结点，则p=NULL)。如表L中无满足条件的结点，则返回NULL，p无定义。
   // 函数equal()的两形参的关键字相等，返回OK；否则返回ERROR
   int i,j;
   i=LocateElem(L,e,equal);
   if(i) // 找到
   {
     if(i==1) // 是首元结点
     {
       p=NULL;
       return L;
     }
     p=L;
     for(j=2;j<i;j++)
       p=p->next;
     return p->next;
   }
   return NULL; // 没找到
 }

 Status DeleteElem(LinkList &L,ElemType &e,ElemType))
 { // 删除表L中满足条件的结点，并返回TRUE；如无此结点，则返回FALSE。
   // 函数equal()的两形参的关键字相等，返回OK；否则返回ERROR
   LinkList p,q;
   q=Point(L,equal,p);
   if(q) // 找到此结点，且q指向该结点
   {
     if(p) // 该结点不是首元结点，p指向其前驱
       ListDelete(p,2,e); // 将p作为头指针,删除第2个结点
     else // 该结点是首元结点
       ListDelete(L,1,e);
     return TRUE;
   }
   return FALSE;
 }
 
typedef VRType QElemType; // 队列元素类型
//队列的链式存储结构
typedef struct QNode{
	QElemType 		data;
	struct QNode 	*next;
}*QueuePtr;

typedef struct LinkQueue{
	QueuePtr 	front,rear;
}LinkQueue;


// 带头结点的单链队列
void InitQueue(LinkQueue &Q);
void DestroyQueue(LinkQueue &Q);
void ClearQueue(LinkQueue &Q);
Status QueueEmpty(LinkQueue Q);
int QueueLength(LinkQueue Q);
Status GetHead(LinkQueue Q,QElemType &e);
void EnQueue(LinkQueue &Q,QElemType e);
Status DeQueue(LinkQueue &Q,QElemType &e);

// 带头结点的单链队列
void InitQueue(LinkQueue &Q)
{
	Q.front = (QueuePtr)malloc(sizeof(QNode));
	if (!Q.front) exit(OVERFLOW);
	
	Q.front->next = NULL;
	Q.rear = Q.front;
		
}
void DestroyQueue(LinkQueue &Q)
{
	QueuePtr q,p = Q.front;
	
	while (p)
	{
		q = p->next;
		free(p);
		p = q;
	}
	
	Q.front = Q.rear = NULL;
}
void ClearQueue(LinkQueue &Q)
{
	QueuePtr q,p = Q.front->next;
	
	while (p)
	{
		q = p->next;
		free(p);
		p = q;
	}
	Q.front->next = NULL;
	Q.rear = Q.front;
}
Status QueueEmpty(LinkQueue Q)
{
	if (Q.front == Q.rear)
		return TRUE;
	else
		return FALSE;
}
int QueueLength(LinkQueue Q)
{
	int i = 0;
	QueuePtr p = Q.front->next;
	
	while (p)
	{
		i++;
		p = p->next;
	}
	
	return i;
}
Status GetHead(LinkQueue Q,QElemType &e)
{
	if (Q.front->next)
	{
		memcpy(&e,&(Q.front->next->data),sizeof(QElemType));
		return OK;
	}
	else
	{
		return FALSE;
	}
}
void EnQueue(LinkQueue &Q,QElemType e)
{
	QueuePtr p = (QueuePtr)malloc(sizeof(QNode));
	if (!p) exit(OVERFLOW);
	
	p->next = NULL;
	memcpy(&(p->data),&e,sizeof(QElemType));
	Q.rear->next = p;
	Q.rear = p;
}
Status DeQueue(LinkQueue &Q,QElemType &e)
{
	QueuePtr p = Q.front,q;
	if (Q.front == Q.rear)
		return FALSE;
	
	q = p->next;
	memcpy(&e,&(q->data),sizeof(QElemType));
	p->next = q->next;
	if (Q.rear == q)
		Q.rear = Q.front;
	free(q);
	
	return OK;
}



// bo7-2.cpp 图的邻接表存储(存储结构由c7-21.h定义)的基本操作(15个)，包括算法7.4～7.6

// 初始条件：图G存在，u和G中顶点有相同特征
// 操作结果：若G中存在顶点u，则返回该顶点在图中位置；否则返回-1
int LocateVex(ALGraph G,VertexType u)
{
	int 	i;
	for (i = 0; i < G.vexnum; ++i)
		if (strcmp(u,G.vertices[i].data) == 0)
			return i;
	return -1;
}

// 采用邻接表存储结构，构造没有相关信息图或网G(用一个函数构造4种图)
void CreateGraph(ALGraph &G)
{
	int 		i,j,k,w;	// w是权值
	VertexType	va,vb;
	ElemType	e;
	
	printf("请输入图的类型(有向图:0,有向网:1,无向图:2,无向网:3): ");
   	scanf("%d",&G.kind);

	printf("请输入图的顶点数,边数: ");
   	scanf("%d,%d",&G.vexnum,&G.arcnum);
	
	printf("请输入%d个顶点的值(<%d个字符):\n",G.vexnum,MAX_NAME);
	for (i = 0; i < G.vexnum; ++i)			// 构造顶点向量
	{
		scanf("%s",G.vertices[i].data);
		G.vertices[i].firstarc = NULL;		// 初始化与该顶点有关的出弧链表
	}
	
	if (G.kind % 2)	// 网
		printf("请输入每条弧(边)的权值、弧尾和弧头(以空格作为间隔):\n");
	else
		printf("请输入每条弧(边)的弧尾和弧头(以空格作为间隔):\n");
	
	for (k = 0; k < G.arcnum; ++k)	// 构造相关弧链表
	{
		if(G.kind%2) // 网
			scanf("%d%s%s",&w,va,vb);
		else // 图
			scanf("%s%s",vb);
			
		i = LocateVex(G,va);	// 弧尾
		j = LocateVex(G,vb);	// 弧头
		
		e.info = NULL;			// 给待插表结点e赋值，图无权
		e.adjvex = j;			// 弧头
		
		if (G.kind % 2)			// 网
		{
			e.info = (int*)malloc(sizeof(int));
			*(e.info) = w;
		}
		
		ListInsert(G.vertices[i].firstarc,e);
		if (G.kind >= 2)	// 无向图或网，产生第2个表结点，并插在第j个元素(入弧)的表头
		{
			e.adjvex = i;	// e.info不变，不必再赋值
			ListInsert(G.vertices[j].firstarc,e);	// 插在第j个元素的表头，在bo2-8.cpp中
		}
	}
}

// 采用邻接表存储结构，由文件构造没有相关信息图或网G(用一个函数构造4种图)
void CreateGraphF(ALGraph &G)
{
	int 		i,vb;
	ElemType	e;
	char		filename[13];
	FILE		*graphlist;
	
	printf("请输入数据文件名(f7-1.txt或f7-2.txt)：");
   	scanf("%s",filename);
   	printf("请输入图的类型(有向图:0,&G.kind);
	graphlist = fopen(filename,"r");	// 以读的方式打开数据文件，并以graphlist表示
	fscanf(graphlist,"%d",&G.vexnum);
   	fscanf(graphlist,&G.arcnum);
   	for(i=0;i<G.vexnum;++i) // 构造顶点向量
   	{
     	fscanf(graphlist,"%s",G.vertices[i].data);
     	G.vertices[i].firstarc=NULL; // 初始化与该顶点有关的出弧链表
   	}
	for(k = 0; k < G.arcnum; ++k) 	// 构造相关弧链表
   	{
     	if(G.kind%2) // 网
       		fscanf(graphlist,"%d%s%s",vb);
     	else // 图
       		fscanf(graphlist,"%s%s",vb);
     	i = LocateVex(G,va); // 弧尾
     	j = LocateVex(G,vb); // 弧头
     	e.info = NULL; // 给待插表结点e赋值，图无权
     	e.adjvex = j; // 弧头
     	if(G.kind%2) // 网
     	{
       		e.info=(int *)malloc(sizeof(int)); // 动态生成存放权值的空间
       		*(e.info)=w;
     	}
     	ListInsert(G.vertices[i].firstarc,e); // 插在第i个元素(出弧)的表头，在bo2-8.cpp中
     	if(G.kind>=2) // 无向图或网，产生第2个表结点，并插在第j个元素(入弧)的表头
     	{
       		e.adjvex=i; // e.info不变，不必再赋值
       		ListInsert(G.vertices[j].firstarc,e); // 插在第j个元素的表头，在bo2-8.cpp中
     	}
   	}
   	fclose(graphlist); // 关闭数据文件
}

// 初始条件：图G存在。操作结果：销毁图G
void DestroyGraph(ALGraph &G)
{ 
   	int i;
   	ElemType e;
   	for(i=0;i<G.vexnum;++i) // 对于所有顶点
    {
     	if(G.kind%2) // 网
       		while(G.vertices[i].firstarc) // 对应的弧或边链表不空
       		{
	 			ListDelete(G.vertices[i].firstarc,e); // 删除链表的第1个结点，并将值赋给e
	 			if(e.adjvex>i) // 顶点序号>i(保证动态生成的权值空间只释放1次)
	   				free(e.info);
       		}
     	else // 图
       		DestroyList(G.vertices[i].firstarc); // 销毁弧或边链表，在bo2-8.cpp中
   	}
   	G.vexnum=0; // 顶点数为0
   	G.arcnum=0; // 边或弧数为0
}

// 初始条件：图G存在，v是G中某个顶点的序号。操作结果：返回v的值
VertexType& GetVex(ALGraph G,int v)
{ 
   	if(v>=G.vexnum||v<0)
     	exit(ERROR);
   	return G.vertices[v].data;
}

// 初始条件：图G存在，v是G中某个顶点。操作结果：对v赋新值value
Status PutVex(ALGraph &G,VertexType v,VertexType value)
{ 
   int i;
   i=LocateVex(G,v);
   if(i>-1) // v是G的顶点
   {
     strcpy(G.vertices[i].data,value);
     return OK;
   }
   return ERROR;
 }

// 初始条件：图G存在，v是G中某个顶点
// 操作结果：返回v的第一个邻接顶点的序号。若顶点在G中没有邻接顶点，则返回-1
int FirstAdjVex(ALGraph G,VertexType v)
{
	ArcNode 	*p;
	int			v1;
	
	v1 = LocateVex(G,v);	// v1为顶点v在图G中的序号
	p = G.vertices[v1].firstarc;
	if (p)
		return p->data.adjvex;
	else
		return -1;
} 

// DeleteArc()、DeleteVex()和NextAdjVex()要调用的函数
Status equalvex(ElemType a,ElemType b)
{ 
   	if(a.adjvex == b.adjvex)
     	return OK;
   	else
     	return ERROR;
}

// 初始条件：图G存在，v是G中某个顶点，w是v的邻接顶点
// 操作结果：返回v的(相对于w的)下一个邻接顶点的序号。若w是v的最后一个邻接点，则返回-1
int NextAdjVex(ALGraph G,VertexType w)
{ 
   	LinkList 	p,p1; // p1在Point()中用作辅助指针，Point()在func2-1.cpp中
   	ElemType	e;
   	int 		v1;
   	
   	v1 = LocateVex(G,v);	// v1为顶点v在图G中的序号
   	e.adjvex = LocateVex(G,w);	// e.adjvex为顶点w在图G中的序号
   	
   	p = Point(G.vertices[v1].firstarc,equalvex,p1);	// p指向顶点v的链表中邻接顶点为w的结点
   	if (!p || !p->next)	// 没找到w或w是最后一个邻接点
   		return -1;
   	else
   		return p->next->data.adjvex;
}

// 初始条件：图G存在，v和图中顶点有相同特征
// 操作结果：在图G中增添新顶点v(不增添与顶点相关的弧，留待InsertArc()去做)
void InsertVex(ALGraph &G,VertexType v)
{
	strcpy(G.vertices[G.vexnum].data,v);	// 构造新顶点向量
	G.vertices[G.vexnum].firstarc = NULL;
	G.vexnum++;								// 图G的顶点数加1
}

// 初始条件：图G存在，v是G中某个顶点。操作结果：删除G中顶点v及其相关的弧
Status DeleteVex(ALGraph &G,VertexType v)
{
	int 		i,k;
	ElemType	e;
	LinkList	p,p1;
	
	j = LocateVex(G,v); 	// j是顶点v的序号
   	if (j < 0) // v不是图G的顶点
     	return ERROR;
	i = ListLength(G.vertices[j].firstarc);	// 以v为出度的弧或边数，在bo2-8.cpp中
	
	G.arcnum -= i;	// 边或弧数
	
	if (G.kind % 2)	// 网
		while (G.vertices[j].firstarc)	// 对应的弧或边链表不空
		{
			ListDelete(G.vertices[j].firstarc,e);	// 删除链表的第1个结点，并将值赋给e
			free(e.info);
		}
	else		// 图
		DestroyList(G.vertices[j].firstarc);	// 销毁弧或边链表
	
	G.vexnum--;		// 顶点数减1
	
	for (i = j; i < G.vexnum; i++)	// 顶点v后面的顶点前移
		G.vertices[i] = G.vertices[i+1];
	for(i=0;i<G.vexnum;i++) // 删除以v为入度的弧或边且必要时修改表结点的顶点位置值
	{
		e.adjvex = j;
		p = Point(G.vertices[i].firstarc,p1);
		if(p) // 顶点i的邻接表上有v为入度的结点
     	{
			if (p1)	// p1指向p所指结点的前驱
				p1->next = p->next;	// 从链表中删除p所指结点
			else	// p指向首元结点
				G.vertices[i].firstarc = p->next;	// 头指针指向下一结点
			
			if (G.kind < 2)	// 有向
			{
				G.arcnum--;			// 边或弧数-1
				if (G.kind == 1)	// 有向网
					free(p->data.info);	// 释放动态生成的权值空间
			}
			free(p);	// 释放v为入度的结点
		}
		
		for (k = j + 1; k <= G.vexnum; k++)
		{
			e.adjvex = k;
			p = Point(G.vertices[i].firstarc,p1);
			if (p)
				p->data.adjvex--;
		}
	}
	
	return OK;
}

// 初始条件：图G存在，v和w是G中两个顶点
// 操作结果：在G中增添弧<v,w>，若G是无向的，则还增添对称弧<w,v>
Status InsertArc(ALGraph &G,VertexType w)
{ 
   	ElemType e;
   	int i,j;
   	i = LocateVex(G,v); // 弧尾或边的序号
   	j = LocateVex(G,w); // 弧头或边的序号
   	if(i<0||j<0)
     	return ERROR;
   	G.arcnum++; // 图G的弧或边的数目加1
   	e.adjvex=j;
   	e.info=NULL; // 初值
   	if(G.kind%2) // 网
   	{
     	e.info=(int *)malloc(sizeof(int)); // 动态生成存放权值的空间
     	printf("请输入弧(边)%s→%s的权值: ",v,w);
     	scanf("%d",e.info);
   	}
   	ListInsert(G.vertices[i].firstarc,e); // 将e插在弧尾的表头，在bo2-8.cpp中
   	if(G.kind>=2) // 无向，生成另一个表结点
   	{
     	e.adjvex=i; // e.info不变
     	ListInsert(G.vertices[j].firstarc,e); // 将e插在弧头的表头
   	}
   	return OK;
}

// 初始条件：图G存在，v和w是G中两个顶点
// 操作结果：在G中删除弧<v,w>，若G是无向的，则还删除对称弧<w,v>
Status DeleteArc(ALGraph &G,VertexType w)
{ 
	int i,j;
   	Status k;
   	ElemType e;
   	i = LocateVex(G,v); // i是顶点v(弧尾)的序号
   	j = LocateVex(G,w); // j是顶点w(弧头)的序号
   	if(i<0||j<0||i==j)
     	return ERROR;
   	e.adjvex=j;
   	k = DeleteElem(G.vertices[i].firstarc,equalvex); // 在func2-1.cpp中
   	if(k) // 删除成功
   	{
     	G.arcnum--; // 弧或边数减1
     	if(G.kind%2) // 网
       		free(e.info);
     	if(G.kind>=2) // 无向，删除对称弧<w,v>
     	{
       		e.adjvex=i;
       		DeleteElem(G.vertices[j].firstarc,equalvex);
     	}
     	return OK;
   	}
   	else // 没找到待删除的弧
     	return ERROR;
}


// 从第v个顶点出发递归地深度优先遍历图G。算法7.5
void DFS(ALGraph G,int v)
{
   	int w;
   	visited[v]=TRUE; // 设置访问标志为TRUE(已访问)
   	VisitFunc(G.vertices[v].data); // 访问第v个顶点
   	for(w=FirstAdjVex(G,G.vertices[v].data);w>=0;w=NextAdjVex(G,G.vertices[v].data,G.vertices[w].data))
     	if(!visited[w])
       		DFS(G,w); // 对v的尚未访问的邻接点w递归调用DFS
}

// 对图G作深度优先遍历。算法7.4
void DFSTraverse(ALGraph G,void(*Visit)(char*))
{ 
   	int v;
   	VisitFunc=Visit; // 使用全局变量VisitFunc，使DFS不必设函数指针参数
   	for(v=0;v<G.vexnum;v++)
     	visited[v]=FALSE; // 访问标志数组初始化
   	for(v=0;v<G.vexnum;v++)
     	if(!visited[v])
       		DFS(G,v); // 对尚未访问的顶点调用DFS
   	printf("\n");
}

typedef int QElemType; // 队列元素类型

//按广度优先非递归遍历图G。使用辅助队列Q和访问标志数组visited。算法7.6
void BFSTraverse(ALGraph G,void(*Visit)(char*))
{
	int			v,u,w;
	LinkQueue	Q;
	for (v = 0; v < G.vexnum; ++v)
		visited[v] = FALSE;	// 置初值
	
	InitQueue(Q);			// 置空的辅助队列Q
	for (v = 0; v < G.vexnum; ++v)	// 如果是连通图，只v=0就遍历全图
	{
		if (!visited[v])
		{
			visited[v] = TRUE;
			Visit(G.vertices[v].data);
			EnQueue(Q,v);	// 入队
			while (!QueueEmpty(Q))	// 队列不空
			{
				DeQueue(Q,u); // 队头元素出队并置为u
				for (w = FirstAdjVex(G,G.vertices[u].data); w > 0; w = NextAdjVex(G,G.vertices[u].data,G.vertices[w].data))
					if (!visited[w])
					{
						visited[w] = TRUE;
						Visit(G.vertices[w].data);
						EnQueue(Q,w);	// w入队
					}
			}
		}
	}
	printf("\n");
}

// 从第v个顶点出发递归地深度优先遍历图G。仅适用于邻接表存储结构
void DFS1(ALGraph G,int v,void(*Visit)(char*))
{
	ArcNode *p;
	visited[v] = TRUE;			// 设置访问标志为TRUE(已访问)
	Visit(G.vertices[v].data);	// 访问该顶点
	for (p = G.vertices[v].firstarc; p; p = p->next)
		if (!visited[p->data.adjvex])
			DFS1(G,p->data.adjvex,Visit);	// 对v的尚未访问的邻接点递归调用DFS1
}

// 对图G作深度优先遍历。DFS1设函数指针参数
void DFSTraverse1(ALGraph G,void(*Visit)(char*))
{
	int v;
	for (v = 0; v < G.vexnum; v++)
		visited[v] = FALSE;
	for (v = 0; v < G.vexnum; v++)		// 如果是连通图，只v=0就遍历全图
		if (!visited[v])				// v尚未被访问
			DFS1(G,Visit);			// 对v调用DFS1
	printf("\n"); 
}

// 按广度优先非递归遍历图G。使用辅助队列Q和访问标志数组visited。仅适用于邻接表结构
void BFSTraverse1(ALGraph G,void(*Visit)(char*))
{ 
   int v,u;
   ArcNode *p; 	// p指向表结点
   LinkQueue Q; // 链队列类型
   for(v = 0; v < G.vexnum; ++v)
     	visited[v] = FALSE; // 置初值为未被访问
   InitQueue(Q); // 初始化辅助队列Q
   for(v = 0; v < G.vexnum; v++) // 如果是连通图，只v=0就遍历全图
     	if(!visited[v]) // v尚未被访问
     	{
       		visited[v]=TRUE; // 设v为已被访问
       		Visit(G.vertices[v].data); // 访问v
       		EnQueue(Q,v); // v入队列
       		while(!QueueEmpty(Q)) // 队列不空
       		{
         		DeQueue(Q,u); // 队头元素出队并置为u
         		for(p=G.vertices[u].firstarc;p;p=p->next) // p依次指向u的邻接顶点
           			if(!visited[p->data.adjvex]) // u的邻接顶点尚未被访问
           			{
             			visited[p->data.adjvex]=TRUE; // 该邻接顶点设为已被访问
             			Visit(G.vertices[p->data.adjvex].data); // 访问该邻接顶点
             			EnQueue(Q,p->data.adjvex); // 入队该邻接顶点序号
           			}
       		}
     	}
   	printf("\n");
}

void Display(ALGraph G)
{ // 输出图的邻接矩阵G
   int i;
   ArcNode *p;
   switch(G.kind)
   {
     case DG: printf("有向图\n");
	      break;
     case DN: printf("有向网\n");
	      break;
     case UDG:printf("无向图\n");
	      break;
     case UDN:printf("无向网\n");
   }
   printf("%d个顶点：\n",G.vexnum);
   for(i=0;i<G.vexnum;++i)
     printf("%s ",G.vertices[i].data);
   printf("\n%d条弧(边):\n",G.arcnum);
   for(i=0;i<G.vexnum;i++)
   {
     p=G.vertices[i].firstarc;
     while(p)
     {
       if(G.kind<=1||i<p->data.adjvex) // 有向或无向两次中的一次
       {
         printf("%s→%s ",G.vertices[i].data,G.vertices[p->data.adjvex].data);
         if(G.kind%2) // 网
           printf(":%d ",*(p->data.info));
       }
       p=p->nextarc;
     }
     printf("\n");
   }
}


 void print(char *i)
 {
   printf("%s ",i);
 }

int main()
{
   int i,n;
   ALGraph g;
   VertexType v1,v2;
   printf("请顺序选择有向图,无向网\n");
   for(i=0;i<4;i++) // 验证4种情况
   {
     CreateGraph(g);
     Display(g);
     printf("插入新顶点，请输入顶点的值: ");
     scanf("%s",v1);
     InsertVex(g,v1);
     printf("插入与新顶点有关的弧或边，请输入弧或边数: ");
     scanf("%d",&n);
     for(k=0;k<n;k++)
     {
       printf("请输入另一顶点的值: ");
       scanf("%s",v2);
       if(g.kind<=1) // 有向
       {
	 printf("对于有向图或网，请输入另一顶点的方向(0:弧头 1:弧尾): ");
	 scanf("%d",&j);
	 if(j)
	   InsertArc(g,v2,v1);
	 else
	   InsertArc(g,v1,v2);
       }
       else // 无向
	 InsertArc(g,v2);
     }
     Display(g);
     if(i==3)
     {
       printf("删除一条边或弧，请输入待删除边或弧的弧尾 弧头：");
       scanf("%s%s",v2);
       DeleteArc(g,v2);
       printf("修改顶点的值，请输入原值 新值: ");
       scanf("%s%s",v2);
       PutVex(g,v2);
     }
     printf("删除顶点及相关的弧或边，请输入顶点的值: ");
     scanf("%s",v1);
     DeleteVex(g,v1);
     Display(g);
     DestroyGraph(g);
   }
}

版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。

相关推荐

VB Format函数
Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强制返回为文本 -------------------------------- 数字类型的格式化 --------------------------------     固定格式参数：     General Number 普通数字，如可以用来去掉千位分隔号     format$("100,1
vb6/ASP FORMAT MM/DD/YYYY
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式，竟然没有好的办法， Format 或者FormatDateTime 竟然结果和系统设置的区域语言的日期和时间格式相关。意思是尽管你用诸如 Format(Now, "MM/dd/yyyy")，如果系统的设置格式区域语言的日期和时间格式分隔符是"-",那他还会显示为 MM-dd-yyyy     只有拼凑： <%response.write
VB.net 捕获项目全局异常
在项目中添加如下代码：新建窗口来显示异常信息。 Namespace My ‘全局错误处理，新的解决方案直接添加本ApplicationEvents.vb 到工程即可 ‘添加后还需要一个From用来显示错误。如果到这步还不会则需要先打好基础啦 ‘======================================================== ‘以下事件
实现用VB.Net/(C#)开发K/3 BOS 插件的真正可行方法
转了这一篇文章，原来一直想用C#做k3的插件开发，vb没有C#用的爽呀，这篇文章写与2011年，看来我以前没有认真去找这个方法呀。 https://blog.csdn.net/chzjxgd/article/details/6176325 金蝶K3 BOS的插件官方是用VB6编写的，如果  能用.Net下的语言工具开发BOS插件是一件很愉快的事情，其中缘由不言而喻，而本文则是个人首创，实现在了用V
vb，wps，excel 分裂
Sub 分列() ‘以空格为分隔符，连续空格只算1个。对所选中的单元格进行处理 Dim m As Range, tmpStr As String, s As String Dim x As Integer, y As Integer, subStr As String If MsgBox("确定要分列处理吗？请确定分列的数据会覆盖它后面的单元格！", _
VB文件 hash 查看器
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single) 2 Dim path As String, hash As String 3 For Each fil
VB.NET MYSQL DataGridView 增删改查INSERT,SELECT,UPDATE,DELETE
  Imports MySql.Data.MySqlClient Public Class Form1 ‘ GLOBAL DECLARATIONS Dim conString As String = "Server=localhost;Database=net2;Uid=root;Pwd=123456;" Dim con As New MySqlConnection
VB.NET 使用ADODB連接資料庫滙出到EXCEL
‘導入命名空間 Imports ADODB Imports Microsoft.Office.Interop   Private Sub A1() Dim Sql As String Dim Cnn As New ADODB.Connection Dim Rs As New ADODB.Recordset Dim S As String   S = "Provider=OraOLEDB.Oracl
vb.net 多线程運用 ping
Imports System.IO Imports System.Threading Imports System.Diagnostics Public Class Form1 Dim A(254) As String    Function ping(ByVal IP As Integer) As String Dim IPAddress As String IPAddress = "10.0.
VB等待进程结束
VB运行EXE程序，并等待其运行结束 参考：https://blog.csdn.net/useway/article/details/5494084 Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long Pr
vb中去掉string数组的一部分
今天碰到一个问题，登陆的时候，如果不需要验证手机号为空，则不去验证手机号 因为登陆的时候所有的验证信息都存放在一个数组里 Dim CheckUserInfo() As String ={UserBirthday, SecEmail, UserMob, UserSex, RealNameFirst, RealName, CheckCardID, CheckCardType, Contactemail
VB如何连接SQL Server数据库
在VB6.0中，数据访问接口有三种： 1、ActiveX数据对象（ADO） 2、远程数据对象（RDO） 3、数据访问对象（DAO） 1.使用ADO（ActiveX Data Objec，ActiveX数据对象）连接SQL Server 1）使用ADO控件连接 使用ADO控件的ConnectionString属性就可以连接SQL Server，该属性包含一个由分号分隔的argument=value语
Visual Basic 6.0VB6.0详细安装过程
注：大家如果没有VB6.0的安装文件，可自行百度一下下载，一般文件大小在200M左右的均为完整版的软件，可以使用。   特别提示：安装此软件的时候最好退出360杀毒软件（包括360安全卫士，电脑管家等，如果电脑上有这些软件的话），因为现如今的360杀毒软件直接会对VB6.0软件误报，这样的话就可能会在安装过程中被误报阻止而导致安装失败，或者是安装后缺乏很多必须的组件（其它的杀毒软件或安全卫士之类的
使用VB6读取数据库资源并发送邮件原创
Private Sub Form_Load() Call conndb End Sub Private Function conndb() Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim strCn, sql As String Dim db_host As String Dim db_user As String
POS VB
  PPSM06S70:  Add  moddate  EDITSPRINTJOB:  MAX(TO_CHAR(ETRN.MODDATE, ‘yyyy/mm/dd/HH24:MI AM‘)) ACTUAL_SHIPDATE   4.Test Scenario (1) ：Query SQL Test DN:8016578337 SELECT CTRN.TKCTID TRUCK_ID,        
vb.net 水晶報表CrystalReport 動態設定資料庫來源
  沒有出現CrystalReportViewer時,須安裝CRforVS_13_0. 新增1個數據集,新增1個數據表,添加二列,列名要和資料庫名一樣. 修改目標Framework 修改app.config, <startup >改成<startup useLegacyV2RuntimeActivationPolicy ="true">  CrystalReport1.rpt增加數據庫專家 在表單
VB.net 与线程
Imports System.Threading Imports System Public Class Form1 Dim th1, th2 As Thread Public Sub Method1() Dim i As Integer For i = 1 To 100 If Me.Label1.BackColor =
vb.net Process32First和Module32First
Friend Const PROCESS_ALL_ACCESS = &H1F0FFF = 2035711 Friend Const PROCESS_VM_READ = &H10 Friend Const PROCESS_VM_WRITE = &H20 Friend Const PAGE_READONLY = &H2 Friend Const PAGE_READWRITE = &H4 Friend
vb.net 分割byte数组的方法SplitBytes
以下代码随手写的 并没有大量测试 效率也有待提升 如果需要C#的请自行转换 Function SplitBytes(Data As Byte(), Delimiter As Byte()) As List(Of Byte()) Dim i = 0 Dim List As New List(Of Byte()) Dim bytes As New
VB.NET连接SQL_Server实例
Imports System.Data.SqlClient Public Class Form1 REM Public conn1 As SqlConnection = New SqlConnection("server=.; Integrated Security=False;Initial Catalog= mydatabase1; User ID= sa;password")
pythonJavaScriptjavaHTMLPHPreactjsC#AndroidCSSNode.jssqlrpython-3.xMysqLjQueryc++pandasFlutterangularIOSdjangolinuxswifttypescript路由器JSON路由器设置无线路由器h3c华三华三路由器设置华三路由器电脑软件教程arraysdocker软件图文教程Cvue.jslaravelspring-boot