c语言计算器源代码

1、# include <stdio.h># include <malloc.h># include <conio.h> # define maxsize 100 typedef double datatype1; typedef char datatype2;typedef struct stack1datatype1 data1maxsize;int top1; /* 栈顶元素 */ seqstack1,*pseqstack1; /* 顺序栈 */ typedef struct stack2datatype2 data2maxsize;int top2; /

2、* 栈顶元素 */ seqstack2,*pseqstack2; /* 顺序栈 */ /* 栈的初始化 */pseqstack1 init_seqstack1(void)pseqstack1 S;S=(pseqstack1)malloc(sizeof(pseqstack1);if(S)S->top1=-1;return S;pseqstack2 init_seqstack2(void)pseqstack2 S;S=(pseqstack2)malloc(sizeof(pseqstack2);if(S)S->top2=-1;return S;/* 判断栈空 */int empty_se

3、qstack1(pseqstack1 S)if(S->top1=-1)return 1;elsereturn 0;int empty_seqstack2(pseqstack2 S)if(S->top2=-1)return 1;elsereturn 0;/*X 入栈 */int push_seqstack1(pseqstack1 S,datatype1 X) 栈满，无法入栈！ n");if(S->top1=maxsize-1) printf(" return 0;+; else S->top1S->data1S->top1=X;return

4、 1;int push_seqstack2(pseqstack2 S,datatype2 X) 栈满，无法入栈！ n");if(S->top2=maxsize-1) printf(" return 0; else S->top2+;S->data2S->top2=X;出栈 */return 1;/*Xint pop_seqstack1(pseqstack1 S,datatype1 *X)if(empty_seqstack1(S)return 0;else*X=S->data1S->top1;S->top1-; return 1;in

5、t pop_seqstack2(pseqstack2 S,datatype2 *X)if(empty_seqstack2(S)return 0;else*X=S->data2S->top2;0*/* 存放栈顶元素 */* 运算符 ch 前的操作数出栈存入/* 运算符 ch 后的操作数出栈存入/*c=a ch b*/* 存放读取到的表达式 (A) 的字符 */* 读表达式字符 =>A*/a*/b*/S=init_seqstack1(); /*while(ch!='#')/*初始化栈 */ 遇到元素 !='#' 时 */S->top2-; r

6、eturn 1;/* 求栈顶元素 */int gettop_seqstack1(pseqstack1 S,datatype1 *X) if(empty_seqstack1(S) return 0;else*X=S->data1S->top1; return 1;int gettop_seqstack2(pseqstack2 S,datatype2 *X) if(empty_seqstack2(S) return 0;else*X=S->data2S->top2; return 1;/* 判断字符是否为操作数。若是返回1，否则返回int isnum(char c)if(c

7、>='0' && c<='9')return 1;elsereturn 0;/* 求后缀表达式的值 */ double postfix_exp(char *A)pseqstack1 S; /* 定义栈 S*/ double operand=0;double result;double a;double b;double c;char ch;ch=*A+;判断 ch 是否为数字字符 , 计算出操作数 */if(isnum(ch)/*operand=operand*10+(ch-'0');else /* 否则 */if(o

8、perand)*/push_seqstack1(S,operand);/*当前字符不是数字 , 操作数结束 , 要入栈operand=0;if(ch!='' && ch!=' ')/* 运算符 ch 后的操作数出栈存入 b*/* 运算符 ch 前的操作数出栈存入 a*/ 将结果赋给 c */pop_seqstack1(S,&b);pop_seqstack1(S,&a);switch(ch) /* 求 a ch b=? , case '+' :c=a+b;break;case '-' :c=a-b;b

9、reak;case '*' :c=a*b;break;case '/' :if(b!=0) c=a/b;else!");printf(" 分母为零push_seqstack1(S,c);/* 将 c 压入栈中 */ ch=*A+;/* 遇到 '#'此时栈顶元素即为计算结果 result*/* 指针向下移动一位 */ 循环结束 */ gettop_seqstack1(S,&result);/* return result;/* 优先级判断函数 */ int priority(char op)switch(op)case

10、'#': return 1; case ')': return 2; case '+':case '-': return 3; case '*':case '/': return 4; case '(': return 5; default : return 0; /* 将指针 infixexp 指向的中缀表达式转换为指针 int infix_exp_value(char *infixexp,char *postfixexp) pseqstack2 S; /* 定义栈 S*/ int

11、 count=0;char w; /*存放读取到的表达式 (infixexp)char c; /*存放栈顶元素 */char topelement;/* 存出栈元素 */ S=init_seqstack2(); /* 初始化栈 */ if(!S) /* 栈的初始化判断 postfixexp的字符 */*/指向的后缀表达式 */!");printf(" 栈初始化失败 return 0; push_seqstack2(S,'#'); W=*infixexp; While(gettop_seqstack2(S,&c),c)!='#'|W!=

12、'#')/*<3> 等于'#' 时循环 */if(isnum(w)/*判断w是否为操作数,若是直接输出，读下一个字符=>w，转<3>*/* 将结束符 '# '/* 读表达式字符 =>W*/加入运算符栈S中*/栈顶元素不等于 '#' 或 w 不if(count)*postfixexp='' postfixexp+; count=0;*postfixexp=w;postfixexp+;w=*(+infixexp);else /*w 若是运算符分类如下 */为')' 则

13、 '('count=1;if( (gettop_seqstack2(S,&c),c)='(' && w=')' )/* 出栈不输出，读下一个字符=>W,转<3>*/如果栈顶为 '(' 并且 wpop_seqstack2(S,&topelement); /*w=*(+infixexp);else将 '(' 出栈存入 topelement*/if(gettop_seqstack2(S,&c),c)='('|priority(gettop_seqs

14、tack2(S,&c),c) ) < priority(w)转<3>*/)/*如果栈顶为'('或者栈顶优先级小于 W优先级，则W入栈，读下一个字符=>w,push_seqstack2(S,W);W=*(+infixexp);else/* 否则*/* 从运算符栈中出栈并输出 , 转<3>*/pop_seqstack2(S,&topelement);*postfixexp=topelement;*postfixexp='#'/*(+postfixexp)='0'/*postfixexp+;'#'*/在指针 postfixexp 指向的后缀表达式结尾追加字符在指针 postfixexp 指向的后缀表达式最后追加结束符'0'*/return 1;/* 主函数 */int main()int i=0;char Amaxsize;char Bmaxsize;printf(" 请输入表达式 ,如:20+13#, 必须以#号结尾 !n"); /* 1+2*(9+7)-4/2# 23+(12*3-2)/4+34*5/7)+108/9# */