急求一个Fleury

xinzhiyong

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

屋顶风影

没有matlab版本的吗
  e$ F4 G  S5 d* _9 Q! f" ]

parkshinyang

诶  有么有  matlab版的

夕夕多

#include <stdio.h>
7 z" \* U$ ]5 R#include <string.h>
3 m+ a; f5 o  O2 ~; \3 Z9 T! t! Sstruct stack
{int top , node[210];} f; //顶点的堆栈
int a[201][201]; //图的邻接矩阵
; ~% K* w" u/ {. {* @9 Jint n;
) |& r4 r( z4 U: A& g* R' Svoid dfs(int x)       //图的深度优先遍历
{int i;
/ t$ Q4 }# D& k0 L' \  N5 {f.top ++; f.node[f.top] = x;
for (i = 1; i <= n; i ++)
6 ~) c( F1 `% X% Mif (a[i][x] > 0)
{ a[i][x] = 0; a[x][i] = 0;     //删除此边
: \5 h1 P. B. [: r$ Sdfs(i);
break; }
}
void Euler(int x)     //欧拉路算法
6 [" V6 h- z( H: W% f8 H{int i , b;
f.top = 0; f.node[f.top] = x;     //入栈
while (f.top >= 0)
/ H5 v% p" Y/ k- Y6 a1 _( R{b = 0;
0 n7 u' l* t& T8 Y! o  J for (i = 1; i <= n; i ++)
if (a[f.node[f.top]][i] > 0)
, ^, i0 p0 s& M" r' g0 F{b = 1; break;}
if (b == 0)       //如果没有点可以扩展，输出并出栈
{ printf("%d " , f.node[f.top]);
f.top --;}
4 [$ p* n* B( Xelse {f.top --; dfs(f.node[f.top+1]);}        //如果有，就DFS
$ ]9 Y" P5 |. C+ d$ C, X! e}
  F2 N! G( w. [: P}
! C$ ~, P# v+ ?9 j% Sint main()
{
2 F0 Z" L  o' X- [' D- p2 j( `int m , s , t , num , i , j , start;
' F- m# z- v) N //input
scanf("%d %d" , &n , &m); //n顶点数    m边数
0 b4 u, h' m7 d% v  lmemset(a , 0 , sizeof(a));
6 z4 E1 W0 f8 v% T for (i = 0; i < m; i ++)
, Q* w" E' N7 a  A/ }. p% ?0 l{printf("innput s,t");
7 b9 f9 Y9 Q0 i0 h8 w+ \& S scanf("%d %d" , &s , &t);
; i( c0 j+ ~( Y* V8 B/ Q! X% d a[s][t] = 1; a[t][s] = 1;
}
//判断是否存在欧拉回路
s = 0; start = 1;
, f* u% T; \) w0 b for (i = 1; i <= n; i ++)
3 `6 x- M* Y- J% @{num = 0;
for (j = 1; j <= n; j ++)
num += a[i][j];
if (num % 2 == 1)
& _9 J+ G  H4 ^4 X# `{start = i; s ++;}
# k, q6 p! I2 q5 [4 L: `. m, G6 o- v}
if ((s == 0) || (s == 2))
3 y5 s1 d9 u6 \  g+ _$ J- xEuler(start);
$ x( }; k7 \! u else printf("No Euler path\n");
getchar(); getchar();
9 E  d2 Z3 A' E0 d' b) treturn 0; }

小旋风假

没有看懂………………

lyyy

网上有一些程序代码。