急求一个Fleury

xinzhiyong

急求一个Fleury算法，求高手来个程序

lyyy

网上有一些程序代码。

小旋风假

没有看懂………………

夕夕多

#include <stdio.h>
#include <string.h>
5 A- w3 Q5 D; O$ e7 J! }' z  sstruct stack
) H; A; H% q* L6 f# R$ A{int top , node[210];} f; //顶点的堆栈
int a[201][201]; //图的邻接矩阵
7 [1 L4 R: s3 W$ ~- aint n;
6 N+ m0 }0 F& R, i# Q( J" ]) ovoid dfs(int x)       //图的深度优先遍历
{int i;
f.top ++; f.node[f.top] = x;
for (i = 1; i <= n; i ++)
if (a[i][x] > 0)
{ a[i][x] = 0; a[x][i] = 0;     //删除此边
9 L: ?! {9 d0 U. N. Y& Ydfs(i);
6 T  D% g( {( n1 K0 Ibreak; }
: P' O7 X) ~& k3 ?+ s}
5 m2 @7 N( C1 }3 A3 Y+ yvoid Euler(int x)     //欧拉路算法
2 D' O9 j3 |( e7 q& U5 Q{int i , b;
f.top = 0; f.node[f.top] = x;     //入栈
* O7 {' @  _& R0 t% _while (f.top >= 0)
{b = 0;
3 m6 i& H# U. k8 @5 B for (i = 1; i <= n; i ++)
if (a[f.node[f.top]][i] > 0)
{b = 1; break;}
if (b == 0)       //如果没有点可以扩展，输出并出栈
! h* g) J; V, ?5 g" V{ printf("%d " , f.node[f.top]);
% r" x$ l* y+ R( V6 y f.top --;}
else {f.top --; dfs(f.node[f.top+1]);}        //如果有，就DFS
}
/ w3 }) X& t- ]# F8 N. s8 @) R}
int main()
; k" Q3 ?# e7 x{
int m , s , t , num , i , j , start;
//input
/ _1 |. E5 j( T4 H# A; a7 Yscanf("%d %d" , &n , &m); //n顶点数    m边数
; \# s7 w/ z) _7 f5 C( {9 o. |. _) tmemset(a , 0 , sizeof(a));
, T$ o3 P7 C- H% y; A4 h for (i = 0; i < m; i ++)
{printf("innput s,t");
scanf("%d %d" , &s , &t);
) C3 S1 Y  x8 a2 a+ }+ _+ Z0 q a[s][t] = 1; a[t][s] = 1;
}
+ _% y: P8 _9 M  t //判断是否存在欧拉回路
, Z  `$ R  z* P8 ]7 o9 Ts = 0; start = 1;
0 B% w  x' B7 a4 A6 k. z$ e: r, }6 G for (i = 1; i <= n; i ++)
9 O! u3 F, A" F1 P! K$ w{num = 0;
# M# i" J& ]. z  Z9 bfor (j = 1; j <= n; j ++)
( B$ c8 o7 o2 V$ |+ e% } num += a[i][j];
: A) u3 H% H7 _( |. k if (num % 2 == 1)
{start = i; s ++;}
% b- O% p4 [, R0 i* n1 a/ A9 z}
0 [, l9 M2 F8 z8 [( f$ ?if ((s == 0) || (s == 2))
Euler(start);
else printf("No Euler path\n");
getchar(); getchar();
return 0; }

parkshinyang

诶  有么有  matlab版的

屋顶风影

没有matlab版本的吗