洪水算法平面内分子团数量.docVIP

【洪水算法 平面内分子团数量】 2008年08月30日 星期六 13:16 平面内分子团数量(洪水算法) 描述 Description 京京接受了一个用染色法测定平面内分子团数量的工作。已知没有分子的位置用0表示。被染色的部分根据其染色深度用1～9表示。由于这些分子具有特殊性，它的延展方向在平面内只有前、后、左、右4个方向。在延伸方向上相互接触的分子构成一个分子团。在一个M×N的矩形区域内，请你帮他统计出分子团的数量（X）。 ?? 输入格式 Input Format 输入：第一行 M N （2=[M，N]=100）第二行 N个0～9之间的数字……第M+1行 N个0～9之间的数字输出格式 Output Format 输出：分子数量 INPUT：4 41203092620001230 OUTPUT：2 【参考程序】：const dx:array[1..4]of longint=(0,-1,0,1);????????? dy:array[1..4]of longint=(-1,0,1,0);var n,m,i,j,c:longint;????? map:array[1..100,1..100]of char;???? a:array[1..100,1..100]of longint;???? bo:array[1..100,1..100]of boolean;procedure flood(x,y,c:longint);var tx,ty,k:longint;begin?? a[x,y]:=c;?? bo[x,y]:=false;?? for k:=1 to 4 do?? begin?????? tx:=x+dx[k];?????? ty:=y+dy[k];?????? if (tx=1)and(tx=n)and(ty=1)and(ty=m)and(map[tx,ty]0)and(bo[tx,ty]) then????????? flood(tx,ty,c);?? end;end;begin??? //while not eof do??? //begin??????? readln(n,m);??????? for i:=1 to n do??????? begin????????? for j:=1 to m do????????? begin??????????? read(map[i,j]);??????????? bo[i,j]:=true;??????????? a[i,j]:=0;????????? end;????????? readln;??????? end;??????? c:=0;??????? for i:=1 to n do????????? for j:=1 to m do??????????? if (map[i,j]0)and(bo[i,j]) then??????????? begin??????????????? inc(c);??????????????? flood(i,j,c);??????????? end;??????? writeln(c);??? //end;end. floodfill函数用法 发表于：2009-7-3 浏览：43 次 来源：华浦软件培训 功 能 填充一个有界区域 用 法 void far floodfill(int x, int y, int border); 程序例 　　#include graphics.h 　　#include stdlib.h 　　#include stdio.h 　　#include conio.h 　　int main(void) 　　{ 　　/* request auto detection */ 　　int gdriver = DETECT, gmode, errorcode; 　　int maxx, maxy; 　　/* initialize graphics, local variables */ 　　initgraph(gdriver, gmode, ); 　　/* read result of initialization */ 　　errorcode = graphresult(); 　　if (errorcode != grOk) 　　/* an error occurred */ 　　{ 　　printf(Graphics error: %s\n, 　　grapherrormsg(errorcode)); 　　printf(Press any key to halt:); 　　getch();