编译原理课程设计代码_第1页
编译原理课程设计代码_第2页
编译原理课程设计代码_第3页
编译原理课程设计代码_第4页
编译原理课程设计代码_第5页
已阅读5页,还剩4页未读 继续免费阅读

下载本文档

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

文档简介

1、#include #include #include constconstSize = 20;MAXM = 1100;char ExpreMAXM,expreMAXM;Lenth; Total;char optSizeSize = asin,acos,atan,sin,cos,tan,lg,ln;char extSize = sctSCTLl; char nneedSize = +-*/();char wuseSize = +-*/()sScCtTlLi#;widSize = 0,0,1,1,2,3,4,5,5,5,5,5,5,5,5,6,7;charkindSizeSize=E+E,E-E,

2、E*E,E/E,EE,(E),(E),sE,SE,cE,CE,tE,TE,lE,LE,i;char TalbeSizeSize=, , , =-, , -, -Y;struct Pchar Com; double imm;OrderMAXM;struct Qbool isx; double val;pub,ImmMAXM;All;char CMP(G;&)bool flag;for (i = 0; i 8; i+)G =;flag = 1;for (t = 0; optit; t+)if (ExpreG != optit)flag = 0; break;G+;if (flag)= G;retu

3、rn exti;return E;bool needex(char c)for (i = 0; nneedi; i+)if (c = nneedi)return 0;return 1;bool Ex()All = 0;Lenth = strlen(Expre); char G;bool flag;doubit;_E = 0,_e = 0;while (_E = 0&Expre_E = 0&Expre_E = 9) | Expre_E = .)_E = .)_E+;flag = 0; continue;if (flag)pub.val = pub.val * 10 + Expreelse_E -

4、 0;pub.val += (Exprebit *= 0.1;_E - 0)*bit;_E+;ImmAll+ = pub; expre_e+ = i;else if (Exprepub.isx = 1;_E = x | Expre_E = X)ImmAll+ = pub;_E+;expre_e+ = i;else if (needex(ExpreG = CMP(_E); if (G != E)_E)expre_e+ = G;elseprf(第%d 个字符附近存在错误n, return 0;_E);elseexpre_e+ = Expre_E+;expre expre Lenth = retur

5、n 1;_e+ = #;_e = 0;_e+;char pri_judge(char x, char y)x_id = -1, y_id = -1;for (i = 0; wusei; i+)if (wusei = x)x_id = widi;if (wusei = y)y_id = widi;if (x_id = -1 | y_id = -1)return -; return Talbex_idy_id;char Find(char *use,G;bool flag;)for (i = 0; i )while (1)G = Stacklast;/优先级判断/归约);if (Stacklast

6、 - 1 = E)last -= 2;else last-;if (pri_judge(Stacklast, G) = )break;G = Find(Stack, last + 1); if (G = !)prf(在第%d 个字符附近出现错误n, last); return 0;if (G != ()if (G = i)if (ImmUImm.isx)OrderTotal.Com = x;elseOrderTotal.Com = i; OrderTotal.imm = ImmUImm.val;UImm+;elseOrderTotal.Com = G;Total+;Top = last + 1

7、; StackTop = E;else if (rela = | rela = =)Stack+Top = expre+;else if (rela = -)prf(第%d 个字符附近出现错误n, return 0;else break;);return 1;bool Check()if(!Ex()return 0;/常数与三角函数、幂函数等转化if (!Deal()return 0; /表达式分析 return 1;double CalcuMAXM;void GetAns(&start, char com)double a, b = Calcustart;if (com = + | com

8、= - | com = * | com = / | com = )a = Calcustart - 1; start-;if (com = +)Calcustart = a + b;else if (com = -)Calcustart = a - b;else if (com = *)Calcustart = a*b;else if (com = /)Calcustart = a / b;else if (com = )Calcustart =(a, b);else if (com = s)Calcustart = asin(b);else if (com = S)Calcustart =

9、sin(b);else if (com = c)Calcustart = acos(b);else if (com = C)Calcustart = cos(b);else if (com = t)Calcustart = atan(b);else if (com = T)Calcustart = tan(b);else if (com = l)Calcustart = log(b);else if (com = L)Calcustart = log10(b);void Query(double x)start = -1;for (i = 0; i Total; i+)if (Orderi.Com = x)Calcu+start = x;else if (Orderi.Com = i)Calcu+start = Orderi.imm;elseGetAns(start,Orderi.Com);prf(结果=%.4lfn, Calcu0);main()double x;prf(输入 Ctrl+Z 结束)请输入函数 f(x)=); while (scanf(%s,Expre)if (!Check()

温馨提示

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

评论

0/150

提交评论