急求一个Fleury

xinzhiyong

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

lyyy

网上有一些程序代码。

小旋风假

没有看懂………………

夕夕多

#include <stdio.h>
9 t$ [: M: i. q/ p0 Y3 k( L#include <string.h>
struct stack
{int top , node[210];} f; //顶点的堆栈
4 q% P- b& N" X# V! Zint a[201][201]; //图的邻接矩阵
int n;
2 d, G. O' G2 [void dfs(int x)       //图的深度优先遍历
{int i;
f.top ++; f.node[f.top] = x;
, X+ q! }9 t9 F" g6 t8 U, |for (i = 1; i <= n; i ++)
* V9 J7 F0 p+ M3 W# Hif (a[i][x] > 0)
) L3 {. R$ r* N, ^4 w* ?' b { a[i][x] = 0; a[x][i] = 0;     //删除此边
dfs(i);
break; }
6 {1 j- m1 \5 b; v" N}
void Euler(int x)     //欧拉路算法
4 e8 R3 i+ l2 n  d5 ~; a7 q: g6 K{int i , b;
- A! e' v& L& }4 |/ h8 J( o, _( D; vf.top = 0; f.node[f.top] = x;     //入栈
' T5 p- ~: p9 M% j" _" ?while (f.top >= 0)
{b = 0;
! k& B6 P' N) `$ e* h3 E! g, X for (i = 1; i <= n; i ++)
if (a[f.node[f.top]][i] > 0)
: a) k! M. N6 B% B! \{b = 1; break;}
0 _% o1 R% |4 N. r$ C$ q  @, T if (b == 0)       //如果没有点可以扩展，输出并出栈
6 @* ~* i8 _! i6 U% i, b{ printf("%d " , f.node[f.top]);
f.top --;}
" T0 W# v  v! ?3 relse {f.top --; dfs(f.node[f.top+1]);}        //如果有，就DFS
}
}
int main()
  y! _2 S5 A5 o1 h3 S{
$ s# E3 v( ?$ M' |4 Pint m , s , t , num , i , j , start;
//input
scanf("%d %d" , &n , &m); //n顶点数    m边数
1 a4 ]- k+ |- zmemset(a , 0 , sizeof(a));
for (i = 0; i < m; i ++)
{printf("innput s,t");
scanf("%d %d" , &s , &t);
# k  F' O9 P$ ~ a[s][t] = 1; a[t][s] = 1;
}
, K% _) ~3 \. z, X6 a( J' ` //判断是否存在欧拉回路
s = 0; start = 1;
for (i = 1; i <= n; i ++)
{num = 0;
' I0 }. z8 L/ A4 y: ]% B& K6 E: Ifor (j = 1; j <= n; j ++)
- i& \6 B* ^9 ?: z& N4 {$ d. p num += a[i][j];
if (num % 2 == 1)
{start = i; s ++;}
}
( Z7 ^9 Z# ?, x0 aif ((s == 0) || (s == 2))
Euler(start);
9 {% n$ Z* f+ }* I8 U) M% s else printf("No Euler path\n");
getchar(); getchar();
# b+ y% x" z3 M' l  _; Xreturn 0; }

parkshinyang

诶  有么有  matlab版的

屋顶风影

没有matlab版本的吗
" a) N' K) _. O1 w' `