#include<stdio.h>
#include<stdlib.h>
#include<string.h>
#define STACK_INIT_SIZE 20
#define STACKCREMENT 10
struct SqStack
{
char *base;
int stacksize;
int top;
};
void InitStack(SqStack &s)
{
s.base=(char *)malloc(sizeof(char));
if(!s.base)exit(0);
s.top=0;
s.stacksize=STACK_INIT_SIZE;
}
char GetTop(SqStack &s)//查找元素
{
char e;
if(s.top==0)exit(0);
e=s.base[s.top-1];
return e;
}
void Push(SqStack &s,char &e)//插入元素
{
if(s.top>=s.stacksize)//栈满，追加存储空间
{
s.base=(char *)realloc(s.base,(s.stacksize+STACKCREMENT)*sizeof(char));
if(!s.base)exit(0);//存储空间分配失败
s.stacksize+=STACKCREMENT;
}
s.top++;
s.base[s.top-1]=e;
}
void Pop(SqStack &s)//删除元素
{
char e;
if(s.top==0)exit(0);
s.top--;
e=s.base[s.top-1];
}
char Precede(char &s,char &c)//比较运算符优先级
{
char Prior[7][7] = { '>','>','<','<','<','>','>','>','>','<','<','<','>','>','>','>','>','>','<','>','>','>','>','>','>','<','>','>', '<','<','<','<','<','=',' ','>','>','>','>',' ','>','>','<','<','<','<','<',' ','='};
char fuhao[7]={'+','-','*','/','(',')','#'};
int i=0;
int m,n;//存储二维数组位置
for(i=0;i<7;i++)
{
if(s==fuhao[i])
{
m=i;break;
}
}
for(i=0;i<7;i++)
{
if(c==fuhao[i])
{
n=i;break;
}
}
return Prior[m][n];
}
char Operate(char &a,char &theta,char &b) {
switch(theta)
{
case '+': return float(a)+float(b);
case '-': return float(a)-float(b);
case '*': return float(a)*float(b);
case '/': return float(a)/float(b);
default : return 0;
}
}
int main()
{
char c,theta,a,b;//接收字符
char m,n,p;
SqStack OPTR,OPND;
p='#';
InitStack(OPTR);Push(OPTR,p);
InitStack(OPND);c=getchar();
while(c!='#'||GetTop(OPTR)!='#')
{
if(c!='+'&&c!='-'&&c!='*'&&c!='/'&&c!='('&&c!=')')
{
Push(OPND,c);c=getchar();
}
else
{
m=GetTop(OPTR);
switch(Precede(m,c))
{
case'<':
Push(OPTR,c);c=getchar();
break;
case'=':
Pop(OPTR);c=getchar();
break;
case'>':
{
theta=OPTR.base[OPTR.top-1];
Pop(OPTR);
a=OPND.base[OPND.top-1];
Pop(OPND);
b=OPND.base[OPND.top-1];
Pop(OPND);
n=Operate(b,theta,a);
Push(OPND,n);
c=getchar();
break;
}
}
}
}
printf("%c\n",GetTop(OPND));
system("pause");
}
