c语言计算器源代码.pdf

# define maxsize 100 typedef double datatype1; typedef char datatype2; typedef struct stack1 { datatype1 data1[maxsize]; int top1; /* 栈顶元素 */ }seqstack1,*pseqstack1; /* 顺序栈 */ typedef struct stack2 { datatype2 data2[maxsize]; int top2; /* 栈顶元素 */ }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_seqstack1(pseqstack1 S) { if(S-top1==-1) return 1; else return 0; } int empty_seqstack2(pseqstack2 S) { if(S-top2==-1) return 1; else return 0; } /*X 入栈 */ int push_seqstack1(pseqstack1 S,datatype1 X) { if(S-top1==maxsize-1) { printf( 栈满，无法入栈！ \n); return 0; } else { S-top1++; S-data1[S-top1]=X; return 1; } } int push_seqstack2(pseqstack2 S,datatype2 X) { if(S-top2==maxsize-1) { printf( 栈满，无法入栈！ \n); return 0; } else { S-top2++; S-data2[S-top2]=X; return 1; } } /*X 出栈 */ int pop_seqstack1(pseqstack1 S,datatype1 *X) { if(empty_seqstack1(S)) return 0; else { *X=S-data1[S-top1]; S-top1--; return 1; } } int pop_seqstack2(pseqstack2 S,datatype2 *X) { if(empty_seqstack2(S)) return 0; else { *X=S-data2[S-top2]; S-top2--; return 1; } } /* 求栈顶元素 */ int gettop_seqstack1(pseqstack1