【转载】中缀变后缀

原创 2015年07月10日 09:45:44
program bds;
const m=50;
type {定义栈}
  stack=array[1..m] of char;
  stack1=array[1..m] of real;
var
 s:stack;
 s1:stack1;
 e,a:string;
 i,l,p,y:integer;
 x:real;
begin
  {中缀表达式e转后缀表达式a, s为运算符栈,P为指针}
 read(e);{读入一个中缀表达式}
 p:=0;
 l:=length(e);
 for i:=1 to l do
  begin
   case e[i] of
    '0'..'9':a:=a+e[i]; {若为数字,进入后缀表达式}
    '(':begin p:=p+1;s[p]:='('; end;{若为左括号,进栈}
    ')':begin     {若为右括号,则左括号前的所有运算符出栈进入后缀表达式,)舍}
        while s[p]<>'(' do
         begin
          a:=a+s[p];p:=p-1;
         end;
         p:=p-1;
        end;
    '+','-':begin{若为+-号,则左括号前的所有运算符出栈进入后缀表达式,+-号进栈}
               while (s[p]<>'(') and (p<>0) do
                begin a:=a+s[p];p:=p-1;end;
               p:=p+1;s[p]:=e[i];
            end;
    '*','/':begin  {若为*/号,则左括号前的栈顶的*/出栈进入后缀表达式,*/号进栈}
             while (p<>0) and ((s[p]='*') or (s[p]='/')) do
              begin
               a:=a+s[p];p:=p-1;
              end;
             p:=p+1; s[p]:=e[i];
            end;
    end;{case}
   end;{for}
   while p<>0 do {所有运算符出栈进入后缀表达式}
   begin
    a:=a+s[p];p:=p-1;
   end;
   writeln(a);
  { 计算后缀表达a的值,S1为存放操作数的栈,P为栈指针}
  l:=length(a); p:=0;
  for i:=1 to l do
   begin
    case a[i] of
     '0'..'9':begin {是操作数,将操作数转为数值类型数据后进栈}
               p:=p+1; val(a[i],x,y); s1[p]:=x;
              end;
     '+':begin     {栈顶的两个操作数出栈,进行加法运算,其结果进栈}
          x:=s1[p];p:=p-1; s1[p]:=s1[p]+x;
         end;
     '-':begin     {栈顶的两个操作数出栈,进行减法运算,其结果进栈}
          x:=s1[p];p:=p-1; s1[p]:=s1[p]-x;
         end;
     '*':begin     {栈顶的两个操作数出栈,进行乘法运算,其结果进栈}
          x:=s1[p];p:=p-1; s1[p]:=s1[p]*x;
         end;
     '/':begin     {栈顶的两个操作数出栈,进行除法运算,其结果进栈}
          x:=s1[p];p:=p-1; s1[p]:=s1[p]/x;
         end;
    end;{case}
   end;{for}
   writeln(s1[p]:5:2); {栈底的结果为最终运算结果}
  end.

版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

java中缀变后缀表达式

  • 2007年08月10日 15:44
  • 1KB
  • 下载

NYOJ-467 中缀式变后缀式【逆波兰法】

题目链接:http://acm.nyist.net/JudgeOnline/problem.php?pid=467 解题思路: 经典的逆波兰法求表达式的值,以前是用栈模拟的,但是没有仔细研究,现在...

利用栈表达式中缀变后缀

  • 2013年07月01日 08:56
  • 1.4MB
  • 下载

nyoj467中缀式变后缀式

中缀式变后缀式 时间限制:1000 ms  |  内存限制:65535 KB 难度:3 描述人们的日常习惯是把算术表达式写成中缀式,但对于机器来说更“习惯于”后缀式,关于算术表达式的中缀式和...

JAVA实现的中缀变前后缀并计算

  • 2013年11月05日 16:33
  • 11KB
  • 下载

中缀式变后缀式&&http://acm.nyist.net/JudgeOnline/problem.php?pid=467

描述 人们的日常习惯是把算术表达式写成中缀式,但对于机器来说更“习惯于”后缀式,关于算术表达式的中缀式和后缀式的论述一般的数据结构书都有相关内容可供参看,这里不再赘述,现在你的任务是将中缀式变为后缀式...

中缀变后缀表达式

  • 2012年11月21日 19:15
  • 2KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:【转载】中缀变后缀
举报原因:
原因补充:

(最多只允许输入30个字)