最近在網(wǎng)上看到一個(gè)求解數(shù)學(xué)表達(dá)式程序,感覺很不錯(cuò),故拿出來修改之后供大家一起分享.
程序如下:
#include <ctype.h> //打開庫文件
#include <stdio.h>
#include <iostream.h>
#include <malloc.h>
#include <process.h>
#include <string.h>

#define error 0
#define ok 1
typedef struct{
? int *base;
? int *top;
? int stacksize;
}sqstack;

class CExpression
{
public:
?CExpression();
?~CExpression();
public:
?void initstack(sqstack &s);
?int gettop(sqstack &s);
?void push(sqstack &s,int e);
?int pop(sqstack &s,int &e);
?int setfind(char a,char b[]); //查找a在b中的位置
?char precede(char op1,char op2,int &flag); //比較op1和op2的優(yōu)先級(jí)
??? int numlink(int opd,int ops,int &flag); //數(shù)字與字符串的連接
?int operate(int n1,char o,int n2,int &flag);//運(yùn)算
??????????? /*
??????????? flag為一個(gè)標(biāo)志變量,
??????????? 1為表達(dá)式有誤！除數(shù)為0！
??????????? 2為表達(dá)式的值過大或過小
??????????? 3為未知類型的錯(cuò)誤,可能沒有這一點(diǎn)
??????????? 但為了容錯(cuò),還是要加上這一點(diǎn)
?-*/
public:
?sqstack opnd;
?sqstack optr;
private:
?sqstack s;
};

CExpression::CExpression()
{
?s.top=s.base;
}

CExpression::~CExpression()
{
}

void CExpression::initstack(sqstack &s)
{
?s.base=(int *)malloc(10*sizeof(int));
?if(!s.base) exit(1);
?s.top=s.base;
?s.stacksize=100;
}

int CExpression::gettop(sqstack &s)
{
?int e;
?e=*(s.top-1);
?return e;
}

void CExpression::push(sqstack &s,int e)
{
??? if(s.top-s.base>=s.stacksize)
?{
??s.base=(int*)realloc(s.base,(s.stacksize+10*sizeof(int)));
??if(!s.base)
???exit(2);
??s.top=s.base+s.stacksize;
??s.stacksize+=10;
?}
?*s.top++=e;
}

int CExpression::pop(sqstack &s,int &e)
{
?if(s.top==s.base)return error;
?e=*--s.top;
?return ok;
}

int CExpression::setfind(char a,char b[])
{
?int i,j;
?i=-1,j=0;
?while(b[j]!='\0')
??if(a==b[j++]) {i=j-1;break;}
??return i;
}

char CExpression::precede(char op1,char op2,int &flag) //比較op1和op2的優(yōu)先級(jí)
{
?int i,j;
?char st1[8]={"+-*/()#"}; //運(yùn)算符初始化
?char st2[7][8]={">><<<>>",">><<<>>",">>>><>>", //比較操作初始化
??">>>><>>","<<<<<= ",">>>> >>","<<<<< ="};
?i=setfind(op1,st1);j=setfind(op2,st1);
?if (i>-1 && j>-1) //如果你所輸入的運(yùn)算符不在+-*/（）#內(nèi)，返回ERROR
?{return st2[i][j];flag=ok;}
?else flag=error;
?return error;
}

int CExpression::numlink(int opd,int ops,int &flag){ //數(shù)字與字符串的連接
?int aa=ops;
?ops=ops*10+opd-48;
?if (ops<0 && aa>0 || aa>214748364)
??flag=error; else flag=ok; //flag=0,說明ops已經(jīng)過大，
?return ops;
}

int CExpression::operate(int n1,char o,int n2,int &flag){ //運(yùn)算
??????????? /*
??????????? flag為一個(gè)標(biāo)志變量,
??????????? 1為表達(dá)式有誤！除數(shù)為0！
??????????? 2為表達(dá)式的值過大或過小
??????????? 3為未知類型的錯(cuò)誤,可能沒有這一點(diǎn)
??????????? 但為了容錯(cuò),還是要加上這一點(diǎn)
?-*/
?
?int result=0;
?switch (o){
?case '+': //加法運(yùn)算
??flag=0;result=n1+n2;
??if (n1>=0 && n2>=0 && result<0 || n1<=0 && n2<=0 && result>0)
???//兩個(gè)大于0的數(shù)相加,和小于0,或兩個(gè)小于0的數(shù)相加,和大于0,返回錯(cuò)誤
??{flag=2;return error;}
??else
??{flag=0;return result;}
??break;
?case '-': //減法運(yùn)算
??flag=0;result=n1-n2;
??if (n1>=0 && n2<0 && result<0 || n1<=0 && n2>0 && result>0)
???//一個(gè)大于0的數(shù)減一個(gè)小于0 的數(shù),和小于0或一個(gè)小于0 的數(shù)減去一個(gè)大于0的數(shù),返回錯(cuò)誤
???
??{flag=2;return error;}
??else
??{flag=0;return result;}
??break;
?case '*': //乘法運(yùn)算
??flag=0;result=n1*n2;
??if (n1>=0 && n2>=0 && result<0 || n1<=0 && n2<=0 && result>0)
???//兩個(gè)大于0的數(shù)相乘,積小于0,或兩個(gè)小于0的數(shù)相乘,積大于0,返回錯(cuò)誤
??{flag=2;return error;}
??else
??{flag=0;return result;}
??break;
?case '/': //除法運(yùn)算
??if(n2!=0) //如果被除數(shù)為0要返加ERROR
??{flag=0;return n1/n2;break;}
??else
???//除數(shù)為0,返回錯(cuò)誤
??{flag=1;return error;break;}
?}
?flag=3;return error;
}

void main()
{
?CExpression expression;
//?sqstack opnd; //用于存放運(yùn)算數(shù)
//?sqstack optr; //用于存放運(yùn)算符
?int theta; //用于存放一個(gè)運(yùn)算符
?int a,b; //用于存放用于操作的兩個(gè)數(shù)
?int temp; //一個(gè)臨時(shí)的變量
?int flag2=0; //一個(gè)標(biāo)志變量，用于判斷是否要連接數(shù)字
?int flag1; //一個(gè)標(biāo)志變量，用于判斷表達(dá)式是否是無效的
?int cn=0; //用于存放字符的位置
?int ops=0; //用于存放當(dāng)前的操作數(shù)
?char st1[255]; //表達(dá)式中最多有255個(gè)字符
?char c; //用于表示當(dāng)前的字符
?for (a=0;a<255;a++) st1[a]='#'; //對(duì)數(shù)組初始化
?expression.initstack(expression.opnd); //對(duì)棧OPND初始化
?expression.initstack(expression.optr); //對(duì)棧OPTR初始化
?expression.push(expression.optr,'#');
?cin>>st1;
?temp=strlen(st1);
?if (st1[temp-1]!='#') st1[temp]='#'; //對(duì)表達(dá)式的結(jié)尾加入一個(gè)#
?
?c=st1[0];
?while(c!='#' || expression.gettop(expression.optr)!='#'){ //cout<<st1;
??
??c=st1[cn];
??if(isdigit(c)) {
???ops=expression.numlink(c,ops,temp);
???if (temp==ok)
???{
????if (flag2) expression.pop(expression.opnd,temp);
????flag2=1;
????expression.push(expression.opnd,ops);
????cn++;
????continue;
???}
???else
???{cout<<"表達(dá)式的值過大,無法計(jì)算!"<<endl;return;}
??}
??else{
???ops=0;
???flag2=0;
???temp=expression.precede(expression.gettop(expression.optr),c,temp); //temp為precede中的一個(gè)代號(hào),為ok為正確的運(yùn)算符比較,為error為錯(cuò)誤的運(yùn)算符比較
???if (temp==error) {cout<<"表達(dá)式有誤！無法求解！"<<endl;return;} //錯(cuò)誤的運(yùn)算符比較時(shí),返回.
???switch (temp){
???case '<':
????expression.push(expression.optr,c);cn++;break; //如果為<,操作符入棧
???case '=':
????expression.pop(expression.optr,temp);cn++;break; //如果為=,操作符出棧
???case '>': //如果為>,執(zhí)行運(yùn)算操作
????expression.pop(expression.optr,theta);
????expression.pop(expression.opnd,b);
????expression.pop(expression.opnd,a);
????expression.operate(a,theta,b,flag1);
????if (flag1==1) {cout<<"表達(dá)式有誤！除數(shù)不能為0！"<<endl;return;}
????else if(flag1==2) {cout<<"表達(dá)式的值過大或過小,無法計(jì)算!"<<endl;return;}
????else if(flag1==3) {cout<<"未知道類型的錯(cuò)誤!"<<endl;return;}
????expression.push(expression.opnd,expression.operate(a,theta,b,flag1));
????break;
???case ' ':
????cout<<"表達(dá)式有誤！無法求解！"<<endl;return;
???} //end switch
??} //end if
?} //end while
?a=expression.gettop(expression.opnd);
?cn=0;
?while(st1[cn]!='#') cout<<st1[cn++]; //輸出你所輸入字符串
?cout<<"=";
?cout<<a<<endl; //輸出最終結(jié)果
}

該程序的缺點(diǎn)是不能處理存在小數(shù)的表達(dá)式.