#include<stdio.h>
#include<malloc.h>
#define MaxSize 100
typedef char ElemType;
typedef struct node
{
ElemType data; //数据元素
struct node *lchild; //指向左孩子
struct node *rchild; //指向右孩子
} BTNode;
void CreateBTNode(BTNode *&b,char *str)
{
BTNode *St[100],*p=NULL;
int top=-1,k,j=0;
char ch;
b=NULL; //建立的二叉树初始时为空
ch=str[j];
while (ch!='\0')
{
switch(ch)
{
case '(':
top++;
St[top]=p;
k=1;
break; //为左结点
case ')':
top--;
break;
case ',':
k=2;
break; //为右结点
default:
p=(BTNode *)malloc(sizeof(BTNode));
p->data=ch;
p->lchild=p->rchild=NULL;
if (b==NULL) //p指向二叉树的根结点
b=p;
else //已建立二叉树根结点
{
switch(k)
{
case 1:
St[top]->lchild=p;
break;
case 2:
St[top]->rchild=p;
break;
}
}
}
j++;
ch=str[j];
}
}
void changechild(BTNode* root)
{
//element eleTemp;
BTNode* bitTemp;
if (root == NULL)
{
root = NULL;
}
else
{
bitTemp = root->lchild;
root->lchild = root->rchild;
root->rchild = bitTemp;
changechild(root->lchild);
changechild(root->rchild);
}
}
void DispBTNode(BTNode *b) //以括号表示法输出二叉树
{
if (b!=NULL)
{
printf("%c",b->data);
if (b->lchild!=NULL || b->rchild!=NULL)
{
printf("(");
DispBTNode(b->lchild);
if (b->rchild!=NULL) printf(",");
DispBTNode(b->rchild);
printf(")");
}
}
}
void PreOrder(BTNode *b) //先序遍历的递归算法
{
if (b!=NULL)
{
printf("%c ",b->data); //访问根结点
PreOrder(b->lchild); //递归访问左子树
PreOrder(b->rchild); //递归访问右子树
}
}
void PreOrder1(BTNode *b)
{
BTNode *St[MaxSize],*p;
int top=-1;
if (b!=NULL)
{
top++; //根结点入栈
St[top]=b;
while (top>-1) //栈不为空时循环
{
p=St[top]; //退栈并访问该结点
top--;
printf("%c ",p->data);
if (p->rchild!=NULL) //右孩子入栈
{
top++;
St[top]=p->rchild;
}
if (p->lchild!=NULL) //左孩子入栈
{
top++;
St[top]=p->lchild;
}
}
printf("\n");
}
}
void InOrder(BTNode *b) //中序遍历的递归算法
{
if (b!=NULL)
{
InOrder(b->lchild); //递归访问左子树
printf("%c ",b->data); //访问根结点
InOrder(b->rchild); //递归访问右子树
}
}
void InOrder1(BTNode *b)
{
BTNode *St[MaxSize],*p;
int top=-1;
if (b!=NULL)
{
p=b;
while (top>-1 || p!=NULL)
{
while (p!=NULL)
{
top++;
St[top]=p;
p=p->lchild;
}
if (top>-1)
{
p=St[top];
top--;
printf("%c",p->data);
p=p->rchild;
}
}
printf("\n");
}
}
void PostOrder(BTNode *b) //后序遍历的递归算法
{
if (b!=NULL)
{
PostOrder(b->lchild); //递归访问左子树
PostOrder(b->rchild); //递归访问右子树
printf("%c ",b->data); //访问根结点
}
}
void PostOrder1(BTNode *b)
{
BTNode *St[MaxSize];
BTNode *p;
int flag,top=-1; //栈指针置初值
if (b!=NULL)
{
do
{
while (b!=NULL) //将t的所有左结点入栈
{
top++;
St[top]=b;
b=b->lchild;
}
p=NULL; //p指向当前结点的前一个已访问的结点
flag=1;
while (top!=-1 && flag)
{
b=St[top]; //取出当前的栈顶元素
if (b->rchild==p) //右子树不存在或已被访问,访问之
{
printf("%c",b->data); //访问*b结点
top--;
p=b; //p指向则被访问的结点
}
else
{
b=b->rchild; //t指向右子树
flag=0;
}
}
}
while (top!=-1);
printf("\n");
}
}
void TravLevel(BTNode *b)
{
BTNode *Qu[MaxSize]; //定义循环队列
int front,rear; //定义队首和队尾指针
front=rear=0; //置队列为空队列
if (b!=NULL)
printf("%c ",b->data);
rear++; //结点指针进入队列
Qu[rear]=b;
while (rear!=front) //队列不为空
{
front=(front+1)%MaxSize;
b=Qu[front]; //队头出队列
if (b->lchild!=NULL) //输出左孩子,并入队列
{
printf("%c ",b->lchild->data);
rear=(rear+1)%MaxSize;
Qu[rear]=b->lchild;
}
if (b->rchild!=NULL) //输出右孩子,并入队列
{
printf("%c ",b->rchild->data);
rear=(rear+1)%MaxSize;
Qu[rear]=b->rchild;
}
}
printf("\n");
}
BTNode *FindNode(BTNode *b,ElemType x) //返回data域为x的结点指针
{
BTNode *p;
if (b==NULL)
return NULL;
else if (b->data==x)
return b;
else
{
p=FindNode(b->lchild,x);
if (p!=NULL)
return p;
else
return FindNode(b->rchild,x);
}
}
BTNode *LchildNode(BTNode *p) //返回*p结点的左孩子结点指针
{
return p->lchild;
}
BTNode *RchildNode(BTNode *p) //返回*p结点的右孩子结点指针
{
return p->rchild;
}
int BTNodeDepth(BTNode *b) //求二叉树b的深度
{
int lchilddep,rchilddep;
if (b==NULL)
return(0); //空树的高度为0
else
{
lchilddep=BTNodeDepth(b->lchild); //求左子树的高度为lchilddep
rchilddep=BTNodeDepth(b->rchild); //求右子树的高度为rchilddep
return (lchilddep>rchilddep)? (lchilddep+1):(rchilddep+1);
}
}
int BTWidth(BTNode *b) //求二叉树b的宽度
{
struct
{
int lno; //结点的层次编号
BTNode *p; //结点指针
}Qu[100]; //定义顺序非循环队列
int front,rear; //定义队首和队尾指针
int lnum,max,i,n;
front=rear=0; //置队列为空队
if (b!=NULL)
{
rear++;
Qu[rear].p=b; //根结点指针入队
Qu[rear].lno=1; //根结点的层次编号为1
while (rear!=front) //队列不为空
{
front++;
b=Qu[front].p; //队头出队
lnum=Qu[front].lno;
if (b->lchild!=NULL) //左孩子入队
{
rear++;
Qu[rear].p=b->lchild;
Qu[rear].lno=lnum+1;
}
if (b->rchild!=NULL) //右孩子入队
{
rear++;
Qu[rear].p=b->rchild;
Qu[rear].lno=lnum+1;
}
}
max=0;
lnum=1;
i=1;
while (i<=rear)
{
n=0;
while (i<=rear && Qu[i].lno==lnum)
{
n++;
i++;
}
lnum=Qu[i].lno;
if (n>max) max=n;
}
return max;
}
else
return 0;
}
int Nodes(BTNode *b) //求二叉树b的结点个数
{
int num1,num2;
if (b==NULL)
return 0;
else if (b->lchild==NULL && b->rchild==NULL)
return 1;
else
{
num1=Nodes(b->lchild);
num2=Nodes(b->rchild);
return (num1+num2+1);
}
}
int LeafNodes(BTNode *b) //求二叉树b的叶子结点个数
{
int num1,num2;
if (b==NULL)
return 0;
else if (b->lchild==NULL && b->rchild==NULL)
return 1;
else
{
num1=LeafNodes(b->lchild);
num2=LeafNodes(b->rchild);
return (num1+num2);
}
}
int main()
{
BTNode *b,*p,*lp,*rp;
char strr[105];
while(~scanf("%s",strr))
{
getchar();
CreateBTNode(b,strr);
printf(" 二叉树b:");
DispBTNode(b);
printf("\n\n");
printf(" 层次遍历序列:");
TravLevel(b);
printf("\n");
printf(" 先序遍历序列:\n");
printf(" 递归算法:");
PreOrder(b);
printf("\n");
printf(" 非递归算法:");
PreOrder1(b);
printf("\n");
printf(" 中序遍历序列:\n");
printf(" 递归算法:");
InOrder(b);
printf("\n");
printf(" 非递归算法:");
InOrder1(b);
printf("\n");
printf(" 后序遍历序列:\n");
printf(" 递归算法:");
PostOrder(b);
printf("\n");
printf(" 非递归算法:");
PostOrder1(b);
printf("\n");
char ch;
scanf("%c",&ch);
printf("(2)%c结点:",ch);
p=FindNode(b,ch);
if (p!=NULL)
{
lp=LchildNode(p);
if (lp!=NULL)
printf("左孩子为%c ",lp->data);
else
printf("无左孩子 ");
rp=RchildNode(p);
if (rp!=NULL)
printf("右孩子为%c",rp->data);
else
printf("无右孩子 ");
}
printf("\n");
printf("(3)二叉树b的深度:%d\n",BTNodeDepth(b));
printf("(4)二叉树b的宽度:%d\n",BTWidth(b));
printf("(5)二叉树b的结点个数:%d\n",Nodes(b));
printf("(6)二叉树b的叶子结点个数:%d\n",LeafNodes(b));
printf("\n");
printf("交换左右孩子后的二叉树:\n");
changechild(b);
printf(" 二叉树b:");
DispBTNode(b);
printf("\n\n");
printf(" 层次遍历序列:");
TravLevel(b);
printf("\n");
printf(" 先序遍历序列:\n");
printf(" 递归算法:");
PreOrder(b);
printf("\n");
printf(" 非递归算法:");
PreOrder1(b);
printf("\n");
printf(" 中序遍历序列:\n");
printf(" 递归算法:");
InOrder(b);
printf("\n");
printf(" 非递归算法:");
InOrder1(b);
printf("\n");
printf(" 后序遍历序列:\n");
printf(" 递归算法:");
PostOrder(b);
printf("\n");
printf(" 非递归算法:");
PostOrder1(b);
printf("\n");
}
return 0;
}