急求一个Fleury

xinzhiyong

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

lyyy

网上有一些程序代码。

小旋风假

没有看懂………………

夕夕多

#include <stdio.h>
% S2 D/ ^/ ~* K8 Z1 ~9 |7 p1 C( ~#include <string.h>
! X* b% C& b; ~, [/ o" istruct stack
{int top , node[210];} f; //顶点的堆栈
int a[201][201]; //图的邻接矩阵
' g. [! M5 b, S  `9 k. j; B" p- aint n;
void dfs(int x)       //图的深度优先遍历
0 m7 W9 e& I& r9 J8 ?( D0 r{int i;
f.top ++; f.node[f.top] = x;
  ~! J1 {( Y. r  Q' O' p, \5 s: o5 tfor (i = 1; i <= n; i ++)
# X) W- O+ ]% M& p3 dif (a[i][x] > 0)
{ a[i][x] = 0; a[x][i] = 0;     //删除此边
dfs(i);
break; }
}
void Euler(int x)     //欧拉路算法
{int i , b;
f.top = 0; f.node[f.top] = x;     //入栈
0 r5 q5 a( Z5 Zwhile (f.top >= 0)
' F/ ^* @' ]7 ?) x* p, N8 _5 i8 d{b = 0;
for (i = 1; i <= n; i ++)
: @( |2 L3 L2 k7 bif (a[f.node[f.top]][i] > 0)
" Y. ?- I4 f3 t& B7 t* T( @* ?. p{b = 1; break;}
if (b == 0)       //如果没有点可以扩展，输出并出栈
{ printf("%d " , f.node[f.top]);
* {+ H" C: S- n% G f.top --;}
: T; Y& S7 Y8 ~else {f.top --; dfs(f.node[f.top+1]);}        //如果有，就DFS
}
}
& p) V  d2 V! q* G5 o/ H& wint main()
{
: S; I) d! S  x9 @+ m- lint m , s , t , num , i , j , start;
4 e3 L5 U' B. f' M2 }5 r. | //input
scanf("%d %d" , &n , &m); //n顶点数    m边数
memset(a , 0 , sizeof(a));
for (i = 0; i < m; i ++)
{printf("innput s,t");
. a5 H; \! p6 ?) q* R scanf("%d %d" , &s , &t);
# |* ^2 y3 A% V% u: T1 u" @ a[s][t] = 1; a[t][s] = 1;
& k# o* R4 A# ]9 @- {/ D}
//判断是否存在欧拉回路
$ X( L3 l1 \0 M1 V8 O, t& ]s = 0; start = 1;
( g* N# Y  o& V8 T# R for (i = 1; i <= n; i ++)
0 t" A! I* ~; Y2 A2 T6 A{num = 0;
" V; H" f; r, a4 Gfor (j = 1; j <= n; j ++)
num += a[i][j];
) K& G+ q9 A% T7 W8 f if (num % 2 == 1)
# |  h' o3 }% N( Q7 L{start = i; s ++;}
; Y+ \- Q, O' h}
+ `- W) b5 v5 e" n7 s, N/ \if ((s == 0) || (s == 2))
Euler(start);
% ?0 g$ e5 N' U1 B3 q else printf("No Euler path\n");
getchar(); getchar();
0 p" e3 J: I# _' Sreturn 0; }

parkshinyang

诶  有么有  matlab版的

屋顶风影

没有matlab版本的吗
3 W; I' ^6 f0 Z3 [