数据结构表达式运算浮点多位小数字运算源代码fromsm_第1页
数据结构表达式运算浮点多位小数字运算源代码fromsm_第2页
数据结构表达式运算浮点多位小数字运算源代码fromsm_第3页
数据结构表达式运算浮点多位小数字运算源代码fromsm_第4页
数据结构表达式运算浮点多位小数字运算源代码fromsm_第5页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、#include #include #include #include#define TURE1#define FALSE0#define OK1#define ERROR0#define INFEASIBLE-1#define OVERLLOW-2#define STACK_INIT_SIZE 100#define STACKINCREMENT 10typedef double Status;typedef structchar *base; char *top;int stacksize;Sqstack1;typedef structdouble *base; double *top;in

2、t stacksize;Sqstack2;int InitStack1(Sqstack1 &s)/初始化 s.base=(char*)malloc(STACK_INIT_SIZE&sizeof(char);if( !s.base ) exit(OVERLLOW); s.top=s.base;s.stacksize=STACK_INIT_SIZE;return OK;int InitStack2(Sqstack2 &s)s.base=(double*)malloc(STACK_INIT_SIZE&sizeof(double);if( !s.base ) exit(OVERLLOW); s.top

3、=s.base;s.stacksize=STACK_INIT_SIZE;return OK;char GetTop1(Sqstack1 s)if( s.top=s.base ) return ERROR;char e=*(s.top-1);return e;double GetTop2(Sqstack2 s)if( s.top=s.base ) return ERROR;double e=*(s.top-1);return e;int Push1(Sqstack1 &s,char e)if(s.top-s.base=s.stacksize)s.base=(char*)realloc(s.bas

4、e,(s.stacksize+STACKINCREMENT)&sizeof(char);if( !s.base ) exit(OVERLLOW);s.top=s.base+s.stacksize;s.stacksize+=STACKINCREMENT;*(s.top)=e;s.top+;return OK;int Push2(Sqstack2 &s,double e)if(s.top-s.base=s.stacksize)s.base=(double*)realloc(s.base,(s.stacksize+STACKINCREMENT)*sizeof(double);if( !s.base

5、) exit(OVERLLOW);/存储分配失败s.top=s.base+s.stacksize;/s.top的值已变s.stacksize+=STACKINCREMENT;*(s.top)=e;s.top+;return OK;char Pop1(Sqstack1 &s)char e;if(s.top=s.base) return ERROR;e=*(s.top-1); s.top-;return e;double Pop2(Sqstack2 &s)double e;if(s.top=s.base) return ERROR;e=*(s.top-1); s.top-;return e;int

6、 In(char x)char a7=+,-,*,/,(,),#; int i; for (i=0;i);return(); case *:if(x2=() return(); case (:if(x2=) return(=);return();case #:if (x2=#) return(=); return(=0&ani=0&ani=9) number=number+(ani-0)*data; /此处为小数data=data/10; i+; /if Push2(s2,number); else /当前字符是运算符 switch(Precede(GetTop1(s1) ,ani) case: char theta=Pop1(s1); double a=Pop2(s2); double b=Pop2(s2); Push

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论