急求一个Fleury

xinzhiyong

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

lyyy

网上有一些程序代码。

小旋风假

没有看懂………………

夕夕多

#include <stdio.h>
9 G3 {2 C; l+ v#include <string.h>
, A, V# k2 U8 s/ E6 \struct stack
{int top , node[210];} f; //顶点的堆栈
& s6 G) E/ `) v9 }( X4 rint a[201][201]; //图的邻接矩阵
int n;
void dfs(int x)       //图的深度优先遍历
8 c( p9 Z  G% b. I! h{int i;
f.top ++; f.node[f.top] = x;
* ^+ t, X* Y* `for (i = 1; i <= n; i ++)
if (a[i][x] > 0)
{ a[i][x] = 0; a[x][i] = 0;     //删除此边
dfs(i);
break; }
}
* e: D3 k' b# Z1 e. f# Z7 X3 p8 uvoid Euler(int x)     //欧拉路算法
3 e) {* s2 u9 G{int i , b;
! r' q  ]: ?1 U7 i7 Z4 Q7 Lf.top = 0; f.node[f.top] = x;     //入栈
- X+ I5 k2 U2 `- W, Uwhile (f.top >= 0)
8 Q6 O5 q( }" n% {  i3 b7 d1 v{b = 0;
for (i = 1; i <= n; i ++)
if (a[f.node[f.top]][i] > 0)
* t9 V/ y1 u3 T) t{b = 1; break;}
  Q: C. ]' \3 K7 T if (b == 0)       //如果没有点可以扩展，输出并出栈
{ printf("%d " , f.node[f.top]);
f.top --;}
else {f.top --; dfs(f.node[f.top+1]);}        //如果有，就DFS
}
" t) T. z1 Q* T( R0 D" k4 |/ R8 c2 z}
4 ~# m; G1 q6 _6 U+ X+ Vint main()
{
& z3 c- o* ?* I* s3 \int m , s , t , num , i , j , start;
//input
5 p  e# R' h$ \/ Tscanf("%d %d" , &n , &m); //n顶点数    m边数
memset(a , 0 , sizeof(a));
for (i = 0; i < m; i ++)
+ \) L: m- z9 D" J{printf("innput s,t");
; ]* y: I# h1 `# q. s! l4 I scanf("%d %d" , &s , &t);
% _1 V3 U" _- ~* X, g& `3 a7 f a[s][t] = 1; a[t][s] = 1;
: E2 z  C  Q  ^! ], _2 b}
//判断是否存在欧拉回路
* a, R, n9 Q) y1 u, U$ ms = 0; start = 1;
; {" B" u) M1 ~. z* X0 R for (i = 1; i <= n; i ++)
{num = 0;
for (j = 1; j <= n; j ++)
9 ~4 d- ^+ T4 s2 N- A2 N num += a[i][j];
# _* P: ?! |  E5 ]. }  @/ _% q if (num % 2 == 1)
{start = i; s ++;}
3 m1 o" D" v% x4 c, R}
- A" b. Z' x# `' Gif ((s == 0) || (s == 2))
0 V% a. k1 C7 v& E0 A. {6 k3 n1 ?  WEuler(start);
else printf("No Euler path\n");
getchar(); getchar();
' x& Q$ N. k  G7 t+ E8 N- i* ^return 0; }

parkshinyang

诶  有么有  matlab版的

屋顶风影

没有matlab版本的吗