/*输入互不相同的一组整数，构造一棵二叉排序树，要求：
① 按递减有序的顺序输出；
② 输入一个整数，查找该整数是否在该二叉排序树中，查找成功返回1，否则返回0；
③ 在②中，若查找成功，则将该结点从二叉排序树中删除。*/ 
#include<stdio.h>
#include<stdlib.h>
typedef struct{
	int key;
}ElemType;
typedef struct BiTNode{
	ElemType data;
	struct BiTNode *lchild,*rchild; 
}BiTNode,*BiTree;
int SearchBST(BiTree T,int key,BiTree f,BiTree &p){
	if(!T){
		p=f;
		return 0;
	}
	else if(key==T->data.key){
		p=T;
		return 1;
	}
	else if(key<T->data.key){
		return SearchBST(T->lchild,key,T,p);
	}
	else return SearchBST(T->rchild,key,T,p);
}
int InsertBST(BiTree &T,ElemType e){
	BiTree s,p;
	if(!SearchBST(T,e.key,NULL,p)){  //查找不成功
		s=(BiTree)malloc(sizeof(BiTNode));
		s->data=e;
		s->lchild=s->rchild=NULL;
		if(!p) T=s;
		else if(e.key<p->data.key)  p->lchild=s;
		else p->rchild=s;
		return 1;
	}
	else return 0;
}
void CreateBiTree(BiTree &T){
    ElemType x;
    scanf("%d",&x.key);
    while(x.key){
        InsertBST(T,x);//在二叉排序树中插入新结点s
        scanf("%d",&x.key);
    }
}
void visit(ElemType data){
	printf("%3d",data.key);
}
void Traverse(BiTree T){
	//递减有序输出 
	if(T){
		Traverse(T->rchild);
		visit(T->data);
		Traverse(T->lchild);
	} 
} 
int Delete(BiTree &p){
	BiTree q,s;
	if(!p->rchild){
		//只需接左子树
		q=p; p=p->lchild;
		free(q); 
	}
	else if(!p->lchild){
		//只需接右子树
		q=p;  p=p->rchild;
		free(q); 
	}
	else{
		//左右子树均不空
		q=p;  s=p->lchild;
		while(s->rchild){
			q=s; s=s->rchild; //找到右下角 
		}
		p->data=s->data; //把右下角s的值赋给p
		if(q!=p) q->rchild=s->lchild;
		else q->lchild=s->lchild; 
		free(s);
	}
	return 1;
}
int DeleteBST(BiTree &T,int key){
	if(!T)  return 0;
	else{
		if(key==T->data.key){
			return Delete(T);
		}
		else if(key<T->data.key)
			return DeleteBST(T->lchild,key);
		else
			return DeleteBST(T->rchild,key);
	}
}
int main(){
	int n;
	BiTree T=NULL;
	printf("输入一组数：");
	CreateBiTree(T);
	printf("递减有序输出：");
	Traverse(T);
	printf("\n");
	printf("输入要删除的数：");
	scanf("%d",&n); 
	DeleteBST(T,n);
	Traverse(T);
	return 0;
}