栈 入栈 出栈 获取栈顶元素

#include<stdio.h>
#include<stdlib.h>
#define OK 1
#define OVERFLOW -2 
#define FALSE 0
#define STACK_INIT_SIZE 100
#define STACKINCREMENT  10
typedef int Status;
typedef float SElemType;
typedef struct
{
	SElemType *base;
	SElemType *top;
	int stacksize;
}SqStack;
//创建空栈 
SElemType InitStack(SqStack &S)
{
	S.base=S.top=(SElemType *)malloc(STACK_INIT_SIZE*sizeof(SElemType));
	if(S.base==NULL)
	{
		exit(OVERFLOW);
	}
	S.top=S.base;
	S.stacksize=STACK_INIT_SIZE;
	return OK;
  }
//入元素
SElemType Push(SqStack &S)
{
	SElemType e;
	printf("请输入需要压入栈顶的元素：");
	scanf("%f",&e); 
	if(S.top-S.base>=S.stacksize)
	{
		S.base=(SElemType *)realloc(S.base,(S.stacksize+STACKINCREMENT)*sizeof(SElemType));
		
	}
	if(!S.base)
	{
		exit(OVERFLOW);
	}
	S.top=S.base+S.stacksize;
	S.stacksize+=STACKINCREMENT;
	*S.top++=e;
	return OK;
} 
SElemType GetTop(SqStack S) 
{
	SElemType e;
	if(S.base==S.top)
	{
		return FALSE; 
	}
	e=*(S.top-1);
	printf("栈顶元素为：%f\n",e); 
	return e;
}
//删除元素
SElemType Pop(SqStack &S)
{
	SElemType e;
	if(S.base==S.top)
	{
		return FALSE; 
	}
	e=*--S.top;
	printf("删除的栈顶元素为：%f\n",e);
	return OK;
 }
Status menu(SqStack &S)
{
	Status val;
	printf("*********欢迎您使用栈操作系统*************\n");
	printf("------------------------------------------\n");
	printf("**************1：压栈*********************\n");
	printf("------------------------------------------\n");
	printf("**************2：弹栈*********************\n");
	printf("------------------------------------------\n");
	printf("**************3:获取栈顶元素**************\n");
	printf("------------------------------------------\n");
	printf("请输入需要执行的操作序列：");
	scanf("%d",&val);
    switch(val)
    {
    	case 1:Push(S);break;
    	case 2:Pop(S);break;
    	case 3:GetTop(S); break;
	}
 } 
int main()
{
	Status i;
	SqStack S;
	InitStack(S);
	for(i=0;i<100;i++)
	{
	   menu(S);	
	}
}