问答题

[说明]
邻接表是图的一种顺序存储与链式存储结合的存储方法。其思想是:对于图G中的每个顶点 vi,将所有邻接于vi的顶点vj连成一个单链表,这个单链表就称为顶点vi的邻接表,其中表头称作顶点表结点VertexNode,其余结点称作边表结点EdgeNode。将所有的顶点表结点放到数组中,就构成了图的邻接表AdjList。邻接表表示的形式描述如下: #define MaxVerNum 100 /*最大顶点数为100*/
typedef struct node /*边表结点*/
int adjvex; /*邻接点域*/
struct node *next; /*指向下一个边表结点的指针域*/ EdgeNode;
typedef struct vnode /*顶点表结点*/
int vertex; /*顶点域*/
EdgeNode *firstedge; /*边表头指针*/
VertexNode;
typedef VertexNode AdjList[MaxVerNum]; /*AdjList是邻接表类型*/
typedef struct
AdjList adjlist; /*邻接表*/
int n; /*顶点数*/
ALGraph; /*ALGraph是以邻接表方式存储的图类型*/
深度优先搜索遍历类似于树的先根遍历,是树的先根遍历的推广。
下面的函数利用递归算法,对以邻接表形式存储的图进行深度优先搜索:设初始状态是图中所有顶点未曾被访问,算法从某顶点v出发,访问此顶点,然后依次从v的邻接点出发进行搜索,直至所有与v相连的顶点都被访问;若图中尚有顶点未被访问,则选取这样的一个点作起始点,重复上述过程,直至对图的搜索完成。程序中的整型数组visited[]的作用是标记顶点i是否已被访问。
[函数]
void DFSTraverseAL(ALGraph *G)/*深度优先搜索以邻接表存储的图G*/
int i;
for(i=0;i< (1) ;i++) visited[i]=0;
for(i=0;i< (1) ;i++)if( (2) ) DFSAL(G,i);void DFSAL(ALGraph *G,int i) /*从Vi出发对邻接表存储的图G进行搜索*/
EdgeNode *p;
(3) ;
p= (4) ;
while(p!=NULL) /*依次搜索Vi的邻接点Vj*/
if(! visited[ (5) ]) DFSAL(G, (5) );
p=p->next; /*找Vi的下一个邻接点*/

【参考答案】

(1) G->n (2) ! visited[i] (3) visited[i]=1 (4) G->adjlist[i]......

(↓↓↓ 点击下方‘点击查看答案’看完整答案、解析 ↓↓↓)
热门 试题

问答题
[说明] 设有一张学生成绩表scores存放在Access数据库Student中,其中包括学生编号、姓名以及各科目考试成绩。下面的应用程序利用ADO Data和DataGrid控件实现了对成绩数据的基本管理,其操作包括: (1)添加新记录:单击“添加”按钮,光标将指向最后一条数据记录,在其后编辑好新的数据记录后,再单击“更新”按钮,该数据即被加入成绩表; (2)删除记录:单击“删除”按钮将删除当前所指记录,其后的数据记录依次上移; (3)更新记录:直接编辑某条已有记录,再单击“更新”按钮将更新成绩表; (4)记录排序:选中单列字段后,单击“排序”按钮,记录集将按该字段升序排列。 程序的运行界面为: 在开发过程中,数据库连接对象使用了名为Adodc1的ADO Data控件,数据显示区域使用了名 DataGnd1的DataGrid控件,界面上从左到右各操作按钮分别取名为CmdAdd、CmdDel、CmdUpdate、 CmdRefresh、CmdSort和CmdExit。[Visual Basic代码]Dim conn, database, table As StringPrivate Sub Form_Load() database = E: Student.mdb ’设置要访问的数据库 conn = Provider=Microsoft.Jet.OLEDB.4.0;Data Souse= & database Adodc1.ConnectionString=conn ’设置连接字符串 table = scores Adode1. (1) = table ’设置所要访问的数据表 Set DataGrid1. (2) = Adodc1End SubPrivate Sub CmdAdd_Click() ’“添加”按钮的单击事件响应过程 Adodc1.Recordset. (3) End SubPrivate Sub CmdDel_Click() ’“删除”按钮的单击事件响应过程 Adodc1.Recordset.Delete Adodc1.Reeordset.MoveNextEnd SubPrivate Sub CmdUpdate_Click() ’“更新”按钮的单击事件响应过程 Adode1.Reeordset.UpdateBatch adAffectAllEnd SubPrivate Sub CmdRefresh_Cliek() ’“刷新”按钮的单击事件响应过程 Adodc1.RefreshEnd SubPrivate Sub CmdSort_Cliek() ’“排序”按钮的单击事件响应过程 If DataGrid1.SelStartCol < 0 Or DataGridl. SelStartCol (4) DataGrid1. SelEndCol Then MsgBox “请选择某一字段(列)!” Exit Sub End If Adodc1. RecordSource = SELECT * FROM & table & order by & _ DataGrid1. Columns( (5) ).DataField Adodc1.RefreshEnd SubPrivate Sub CmdExit_Click() ’“退出”按钮的单击事件响应过程 EndEnd Sub
问答题
[说明] 下面的程序演示了根据随机产生的奖牌数,生成金银奖牌榜的过程。程序使用的排序法是简单排序法。以金牌得数为例,其思想是选择最大的元素,将它交换到最前面;然后对剩下的部分采用同样的方法,直到全部排序完成。 程序界面中,左右两个文本框分别用于存放随机产生的奖牌数以及生成的奖牌榜,名为Text1和Text2,上下两个按钮分别名为Command1和Command2。代码中使用的量主要有:一维数组 cntries,用于存储10个国家的名称,二维数组medals,其元素medals(i,0)和medals(i,1)分别用于存放第i个(i从0开始)国家的金、银牌数目。[Visual Basic代码]Dim cntries(10) As String, medals(10,2) As Integer’随机产生奖牌数Sub newMedals() …… ’为数组cntries和medals赋值End Sub’输出奖牌榜Sub printOut(txt As (1) ) Dim strResuh As String, i As Integer strResult=“国家”& Chr(9) &“金牌数”& Chr(9) &“银牌数”& vbCrLf For i=0 To 9 strResult = strResult & cntries(i) & Chr(9) & medals(i,0) & Chr(9) & medals(i,1) & vbCrLf Next txt.Text = strResultEnd Sub’交换两变量的值Sub exchange( (2) a As Variant, (2) b As Variant) Dim temp As Variant temp = a: a = b: b = tempEnd Sub’随机产生并输出奖牌数Private Sub Command1_Click() newMedals printOut Text1End Sub’生成并输出奖牌榜Private Sub Command2_Click() Dim i,j, k As Integer, temp As String For i = 0 To 9 ’按金牌数排序 j = i ’找到自第i个位置起全部数据中金牌得数最多者,记其下标为j For k = i + 1 To 9 If (3) Then j=k Next If i < > j Then ’若i,j不等,则交换对应位置的国家名、金银牌数目 exchange cntnes(i), entries(j) exchange medals(i, 0), medals(j, 0) exchange medals(i, 1), medals(j, 1) End If Next For i = 0 To 9 ’按银牌数进行二次排序 j = i For k = i + 1 To 9 If medals(k,0) <> medals(j, 0) Then (4) If (5) Then j = k Next If i < > j Then exchange cntries(i), cntries(j) exchange medals(i, 1), medals(j, 1) End If Next printOut Text2End Sub