nyoj 99 单词拼接（欧拉图）

单词拼接

时间限制： 3000 ms  |  内存限制： 65535 KB

难度： 5

描述

给你一些单词，请你判断能否把它们首尾串起来串成一串。

前一个单词的结尾应该与下一个单词的道字母相同。

如

aloha

dog

arachnid

gopher

tiger

rat

 

可以拼接成：aloha.arachnid.dog.gopher.rat.tiger

输入

第一行是一个整数N(0<N<20)，表示测试数据的组数
每组测试数据的第一行是一个整数M,表示该组测试数据中有M(2<M<1000)个互不相同的单词，随后的M行，每行是一个长度不超过30的单词,单词全部由小写字母组成。

输出

如果存在拼接方案，请输出所有拼接方案中字典序最小的方案。(两个单词之间输出一个英文句号".")
如果不存在拼接方案，则输出
***

样例输入

2
6
aloha
arachnid
dog
gopher
rat
tiger
3
oak
maple
elm

样例输出

aloha.arachnid.dog.gopher.rat.tiger
***

思路：这是有向图的欧拉图，只不过把单词看做节点，度的话要分头字母和尾字母。

先判断是否具有欧拉图性质，在构建欧拉图（也判断了是否联通）。

以下代码有两个方法，用其中一个，别忘了把另一个方法注释掉，当时对比dfs方法与eluer方法感觉是一样的，但是dfs有回溯，而eluer不需要回溯，当时有点懵，不懂，其实是差不多的，只不过dfs先记录了路径，所以不通时需要回溯，而eluer时一直找到底，在找不到下一节点，那么这个点是终点，进栈，再找下一个直到找不到的，这是倒数第二个节点，进栈，直到找完（是否联通看栈中元素个数是否与节点数相同）。

实在搞不懂，找个例子跑一边就懂了：输出   ber.rfs.sdt.tag.gkd.dfg.gaa 

18
7
ber
dfg
rfs
gkd
sdt
tag
gaa

#include<stdio.h>
#include<stack>
#include<algorithm>
#include<string>
#include<string.h>
#include<math.h>
using namespace std;
struct node{
	int s,e;
	char g[35];
}s[1005];
int in[26];
int out[26];
int vis[1005];
int jie[1005];
int m;
stack<node>q;
bool cmp( node a, node b){//排序 
	return strcmp(a.g ,b.g )<0;
}
int dfs(int k,int cnt){//深搜构造欧拉通路 
	if(cnt==m) return 1;
	for(int i=0;i<m;i++){
		if(k!=s[i].s||vis[i]) continue;
		vis[i]=1;
		jie[cnt]=i;
		if(dfs(s[i].e,cnt+1)) return 1;
		vis[i]=0;
	}
	return 0;//不连通 
}
void euler (int k){
	for(int i=0;i<m;i++){
		if(k==s[i].s&&!vis[i]){//找符合条件的单词 
			vis[i]=1;
			euler(s[i].e);//以这个单词的结尾找下一个的开头 
			q.push(s[i]);//递归从下自上，终点进栈 
		}
	}
} 
int jude(){//判断是否含有欧拉通路，有则返回起点 
	int c1=0,c2=0;
	int ans=0;
	for(int i=0;i<26;i++){
		if(fabs(in[i]-out[i])>1) return -1;
		else if(in[i]-out[i]==1) c1++;
		else if(in[i]-out[i]==-1) {
			c2++;ans=i;
		}
	}
	if(c2>1||c1>1) return -1;
	if(c2==0){
		for(int i=0;i<26;i++)
		if(out[i]) return i;
	}
	else return ans;
}
int main()
{
	int n;
	scanf("%d",&n);
	while(n--){
		memset(in,0,sizeof(in));
		memset(out,0,sizeof(out));
		memset(vis,0,sizeof(vis));
		scanf("%d",&m);
		for(int i=0;i<m;i++){
			scanf("%s",s[i].g);
			int len=strlen(s[i].g);
			s[i].s= s[i].g[0]-'a';
			s[i].e=s[i].g[len-1]-'a';
			in[s[i].e]++;
			out[s[i].s]++;
		}
		int u=jude();
	/*	if(u==-1){
			printf("***\n");
			continue;
		}
		sort(s,s+m,cmp);
		if(dfs(u,0)){
			printf("%s",s[jie[0]].g );
			for(int i=1;i<m;i++)
				printf(".%s",s[jie[i]].g );
				printf("\n");
		}
		else {
			printf("***\n");
		}*/
	euler(u);
	if(q.size()==m){//栈中元素等于节点数，联通。 
		node f=q.top();
		q.pop();
			printf("%s",f.g );
			while(!q.empty()){
				f=q.top();
				q.pop();
			printf(".%s",f.g );	
			}	
		printf("\n");
		}
		else {
			printf("***\n");
		}
		while(!q.empty()){
			q.pop();
		}
		
	}
	return 0;
}