洛谷 P1739 表达式括号匹配

题目描述

假设一个表达式有英文字母（小写）、运算符（+，—，*，/）和左右小（圆）括号构成，以“@”作为表达式的结束符。请编写一个程序检查表达式中的左右圆括号是否匹配，若匹配，则返回“YES”；否则返回“NO”。表达式长度小于255，左圆括号少于20个。

输入输出格式

输入格式：
一行：表达式

输出格式：
一行：“YES” 或“NO”

输入输出样例

输入样例#1：
①
2*(x+y)/(1-x)@
②
(25+x)(a(a+b+b)@

输出样例#1：
①
YES
②
NO
说明

表达式长度小于255，左圆括号少于20个

分析：开一个栈，然后比较一下是否匹配，且左括号和右括号都没有多。（提示：也可以不用栈）

代码：

var
 s:ansistring;
 a:array [1..100] of char;
 i,top:longint;
begin
 readln(s);
 for i:=1 to length(s) do
  begin
   if s[i]='(' then
    begin inc(top); a[top]:=s[i]; end;
   if s[i]=')' then
    begin
     if top=0 then
      begin
       writeln('NO');
       exit;
      end;
     dec(top);
    end;
  end;
 if top>0 then writeln('NO')
          else writeln('YES');
end.