第八章 广度优先搜索算法.pptVIP

第八章 广度优先搜索算法; 【模块1】 Program bfs; 初始化，初始状态存入队列； 队列首指针head:=0; 尾指针tail:=1; while headtail do begin inc（head）；指针head后移一位，指向待扩展节点； for i:=1 to max do begin if 新节点是目标节点 then 输出并退出； if 新节点符合条件，并且新节点与原已产生的节点不重复 then tail指针加1，把新节点加入到队尾； end； end；;【广度优先搜索注意事项】 1、每生成一个子节点，就要提供指向它们父亲节点的指针。当解出现时候，通过逆向跟踪，可以找到从根节点到目标节点的一条路径。（当然不要求输出路径的，就没必要记住父亲节点）； 2、生成的节点要与前面所有已经产生的节点比较，以免出现重复节点，浪费时间和空间，还有可能陷入死循环； 3、如果目标节点的深度与费用（如：路径长度）成正比，那么找到的第一个解即为最优解，这时，搜索速度比深度搜索要快些，在求最优解时往往采用广度优先搜索；如果节点的费用不与深度成正比时，第一次找到的解不一定是最优解。; 【算法分析】看图很容易想到用邻接矩阵来存储顶点之间的关系，0表示有通路，即有边；1表示没有通路，即没有边存在。 定义一个a数组，充当存储扩展节点的队列，a[i].city记录经过的城市，a[i].pre记录前驱城市，这样就可以倒推出最短线路了，具体过程如下： 1、将城市A入队，队首指针为0，队尾指针为1； 2、将队首所指相连的城市依次入队（注意的是该城市在队列中未曾出现过），同时将入队城市的pre指向队首位置。然后将队首指针加1，得到新的队首城市。重复以上操作步骤，直到搜到H城市。利用pre可以倒推出最少城市线路。 ;【参考程序】 Program ex_1; const ju:array[1..8,1..8] of 0..1=( (1,0,0,0,1,0,1,1), (0,1,1,1,1,0,1,1), (0,1,1,0,0,1,1,1), (0,1,0,1,1,1,0,1), (1,1,0,1,1,1,0,0), (0,0,1,1,1,1,1,0), (1,1,1,0,0,1,1,0), (1,1,1,1,0,0,0,1)); type node=record city:char; pre:integer; end; var head,tail,i:integer; a:array[1..100] of node; s:array[‘A’..’H’] of boolean; procedure print(d:integer); begin write(a[d].city); repeat d:=a[d].pre; write(‘--------’,a[d].city); until a[d].pre=0; end; ; 【算法分析】 1、读入m*n矩阵阵列，将其转换成为boolean矩阵存入bz数组中； 2、沿bz数组矩阵从上到下、从左到右，找到遇到的第一个细胞； 3、将细胞的位置入队h，并沿其上、下、左、右四个方向上的细胞位置入队，入队后的位置bz数组置为false； 4、将h队头出队，沿其上、下、左、右四个方向上的细胞位置入队，入队后的位置bz数组置为false； 5、重复4，直到h队空为止，则此时找到了一个细胞； 6、重复2，直至矩阵找不到细胞； 7、输出找到的细胞个数。 ;【参考程序】 program cell; const dx:array[1..4] of -1..1=(-1,0,1,0); dy:array[1..4] of -1..1=(0,1,0,-1); var name,s:string; n,m,i,j,num:integer; pic:array[1..50,1..50] of integer;