栈 入栈 出栈 获取栈顶元素

#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); 
  }
}