洛谷P1739 表达式括号匹配

表达式括号匹配

题目描述

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

分析

  用类似栈的方法做，从前往后记录左括号出现个数，每找到一个右括号就减一，如果最后不等于0就不匹配。

代码

var
  s:string;
  i,x:longint;


begin
  readln(s);
  for i:=1 to length(S) do
    begin
      if s[i]='(' then inc(x);
      if s[i]=')' then dec(x);
      if x<0 then begin writeln('NO');halt;end;
    end;
  if x<>0 then writeln('NO') else writeln('YES');
end.