C语言-计算器实现（Dev c++编译通过）

转自http://zhangjunhd.blog.51cto.com/113473/102014

算法描叙：

－括号匹配

int match(char * cs, int size);
1.做一个空栈。读入字符直到文件尾。
2.对读入的字符进行判断，
    2.1如果字符是一个左括号，则入栈；
    2.2如果字符是一个右括号，如果栈空或弹出的左括号不匹配，则匹配失败；
    2.3输入结束，如果栈非空，则匹配失败，否则匹配成功。

－计算后缀表达式的值(假定后缀表达式正确)

int postfixValue(char * expression, int size);
1.做一个空栈，读入字符直到文件尾。
2.对读入的字符进行判断，
    2.1如果是数字，则入栈；
    2.2如果是运算符，则弹出两个数字并将计算结果入栈。
3.计算完毕后，最后弹出的值即为最终计算结果。

－中缀表达式转后缀表达式(假定中缀表达式正确)

void convertExpression(char * expression, int size);
1.做一个空栈，读入字符直到文件尾。
2.对读入的字符进行判断，
    2.1如果是操作数，则直接输出；
    2.2如果是运算符(+-*/)
        2.2.1如果栈不空，并且栈顶元素的优先级大于当前运算符优先级，则输出栈中所有优先级大于当前元素的运算符；
        2.2.2当前元素入栈；
        2.2.3上述四个运算符优先级均大于'('优先级。
    2.3如果是运算符'('，则入栈。
    2.4如果是运算符')'，则出栈所有'('之前的栈元素，'('出栈，但不加入最终表达式。
3.输入完毕后，输出所有剩下的栈元素。

 

源代码：

 

#include <stdio.h> #include <stdlib.h> #include <string.h> #include <ctype.h> #define TRUE 1 #define FALSE 0 #define EmptyTOS (-1) #define MinStackSize (5) struct StackRecord; typedef struct StackRecord *Stack; typedef char ElementType; int IsEmpty(Stack S); int IsFull(Stack S); Stack CreateStack(int MaxElements); void DisposeStack(Stack S); void MakeEmpty(Stack S); void Push(ElementType X,Stack S); ElementType Top(Stack S); void Pop(Stack S); ElementType TopAndPop(Stack S); static int left(char c); static int right(char c); static int pair(char left, char right); int match(char * cs, int size); int postfixValue(char * expression, int size); static int compareSymbol(char symbol, char prevSymbol); void convertExpression(char * expression, int size); struct StackRecord { int Capacity; int TopOfStack; ElementType *Array; }; int main() { char chars[]="1+{5*[4-(4-10)+2*23]+12/11}("; if(match(chars,strlen(chars))) printf("true /n"); else printf("false /n"); char exp1[]="6523+8*+3+*"; printf("postfixValue=%d /n",postfixValue(exp1,strlen(exp1))); char exp2[]="a+b*c+(d*e+f)*g"; convertExpression(exp2,strlen(exp2)); printf("/n"); char exp3[]="3+5*6+(5*6+9)*10+2+6+9"; convertExpression(exp3,strlen(exp3)); printf("/n"); system("PAUSE"); return 0; } //括号匹配 int match(char *cs,int size) { int i; int ch; Stack S=CreateStack(size); for(i=0;i<size;i++) { ch=*(cs+i); if(left(ch)) Push(ch,S); else if(right(ch)) if(IsEmpty(S)||!pair(TopAndPop(S),ch)) return FALSE; } if(!IsEmpty(S)) return FALSE; return TRUE; } //判断是否为左括号 static int left(char c) { if(c=='('||c=='['||c=='{') return TRUE; return FALSE; } //判断是否为右括号 static int right(char c) { if(c==')'||c=='}'||c==']') return TRUE; return FALSE; } //判断是否配对 static int pair(char left,char right) { if ((left=='('&&right==')')|| (left=='['&&right==']')|| (left=='{'&&right=='}')) return TRUE; return FALSE; } //计算后缀（逆波兰）表达式的值 int postfixValue(char *expression,int size) { int i; int ch; int tmp=0; Stack s=CreateStack(size); for(i=0;i<size;i++) { ch=*(expression+i); if(isdigit(ch)) Push(ch-'0',s); else switch(ch) { case '+': Push(TopAndPop(s)+TopAndPop(s),s); break; case '-': tmp=TopAndPop(s); Push(tmp-TopAndPop(s),s); break; case '*': Push(TopAndPop(s)*TopAndPop(s),s); break; case '/': tmp=TopAndPop(s); Push(tmp/TopAndPop(s),s); break; default: printf("wrong expression! /n"); break; } } return TopAndPop(s); } //中缀表达式转后缀表达式 void convertExpression(char *expression,int size) { int i; int ch; Stack s=CreateStack(size); for(i=0;i<size;i++) { ch=*(expression+i); //if(isalpha(ch)) //若ch是字母('A'-'Z','a'-'z')返回非0值,否则返回0 if(isalnum(ch)) //若ch是字母('A'-'Z','a'-'z')或数字('0'-'9') //返回非0值,否则返回0 printf("%c",ch); else { switch(ch) { case '+': case '-': case '*': case '/': if(!IsEmpty(s)&&compareSymbol(ch,Top(s))<=0) { printf("%c",TopAndPop(s)); while(!IsEmpty(s)&&compareSymbol(ch,Top(s))<=0) printf("%c",TopAndPop(s)); } Push(ch,s); break; case '(': Push(ch,s); break; case ')': while(!IsEmpty(s)) { if(Top(s)!='(') printf("%c",TopAndPop(s)); else { Pop(s); break; } } break; default: printf("wrong expression! /n"); break; } } } while(!IsEmpty(s)) printf("%c",TopAndPop(s)); } ///* equal:0; bigger:1; smaller:-1 */ 优先级判定 static int compareSymbol(char symbol,char prevSymbol) { if(prevSymbol=='(') return 1; if(symbol=='+'||symbol=='-') { if(prevSymbol=='+'||prevSymbol=='-') return 0; else return -1; } else { if(prevSymbol=='+'||prevSymbol=='-') return 1; else return 0; } } //栈是否为空 int IsEmpty( Stack S ) { return S->TopOfStack == EmptyTOS; } //栈是否满了 int IsFull( Stack S ) { return S->TopOfStack == S->Capacity - 1; } //建立空栈 Stack CreateStack( int MaxElements ) { Stack S; if( MaxElements < MinStackSize ) printf( "Stack size is too small" ); S = malloc( sizeof( struct StackRecord ) ); if( S == NULL ) printf( "Out of space!!!" ); S->Array = malloc( sizeof( ElementType ) * MaxElements ); if( S->Array == NULL ) printf( "Out of space!!!" ); S->Capacity = MaxElements; MakeEmpty( S ); return S; } //栈置空 void MakeEmpty( Stack S ) { S->TopOfStack = EmptyTOS; } //废弃栈 void DisposeStack( Stack S ) { if( S != NULL ) { free( S->Array ); free( S ); } } //入栈 void Push( ElementType X, Stack S ) { if( IsFull( S ) ) printf( "Full stack" ); else S->Array[ ++S->TopOfStack ] = X; } //返回栈顶数据 ElementType Top( Stack S ) { if( !IsEmpty( S ) ) return S->Array[ S->TopOfStack ]; printf( "Empty stack" ); return 0; /* Return value used to avoid warning */ } //弹出栈顶数据 void Pop( Stack S ) { if( IsEmpty( S ) ) printf( "Empty stack" ); else S->TopOfStack--; } //弹出并返回栈顶数据 ElementType TopAndPop( Stack S ) { if( !IsEmpty( S ) ) return S->Array[ S->TopOfStack-- ]; printf( "Empty stack" ); return 0; /* Return value used to avoid warning */ }