pascal括号匹配描述 给定一个算术表达式,检查其中的圆括号是否配对,给出适当信息(正好:Yes,左括号多:Left,右括号多:Right)输入格式 一行字符. 输出格式 三个信息之一.
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/08 17:05:02
![pascal括号匹配描述 给定一个算术表达式,检查其中的圆括号是否配对,给出适当信息(正好:Yes,左括号多:Left,右括号多:Right)输入格式 一行字符. 输出格式 三个信息之一.](/uploads/image/z/88564-4-4.jpg?t=pascal%E6%8B%AC%E5%8F%B7%E5%8C%B9%E9%85%8D%E6%8F%8F%E8%BF%B0+++++++++%E7%BB%99%E5%AE%9A%E4%B8%80%E4%B8%AA%E7%AE%97%E6%9C%AF%E8%A1%A8%E8%BE%BE%E5%BC%8F%2C%E6%A3%80%E6%9F%A5%E5%85%B6%E4%B8%AD%E7%9A%84%E5%9C%86%E6%8B%AC%E5%8F%B7%E6%98%AF%E5%90%A6%E9%85%8D%E5%AF%B9%2C%E7%BB%99%E5%87%BA%E9%80%82%E5%BD%93%E4%BF%A1%E6%81%AF%EF%BC%88%E6%AD%A3%E5%A5%BD%EF%BC%9AYes%2C%E5%B7%A6%E6%8B%AC%E5%8F%B7%E5%A4%9A%EF%BC%9ALeft%2C%E5%8F%B3%E6%8B%AC%E5%8F%B7%E5%A4%9A%EF%BC%9ARight%29%E8%BE%93%E5%85%A5%E6%A0%BC%E5%BC%8F++++++++%E4%B8%80%E8%A1%8C%E5%AD%97%E7%AC%A6.++++%E8%BE%93%E5%87%BA%E6%A0%BC%E5%BC%8F+++++++%E4%B8%89%E4%B8%AA%E4%BF%A1%E6%81%AF%E4%B9%8B%E4%B8%80.)
xRN@l7&,H|+v][251em\ Ui#$ B !GC3:7Yxt9̙j%5Fhj|',n`-7{\W˛69:Kg>3K"urÍ{{Ϟ5?T'hNWCpl/qqqyk}ڄ;xoK(̏qGftx:sGx^^@=J{IR6Jrx%\gYDN_£Tr6-oNDxFxgidLrV?xڗSFQ"Vƞ)ULy8+) 5f 1t2zmXQu?ayQ
rA@IAB&-rjxMqIeXK@xTeD&
jЧ>nL$
rPP0k&tWƋ
g1@/g`r
pascal括号匹配描述 给定一个算术表达式,检查其中的圆括号是否配对,给出适当信息(正好:Yes,左括号多:Left,右括号多:Right)输入格式 一行字符. 输出格式 三个信息之一.
pascal括号匹配
描述
给定一个算术表达式,检查其中的圆括号是否配对,给出适当信息(正好:Yes,左括号多:Left,右括号多:Right)
输入格式
一行字符.
输出格式
三个信息之一.
样例输入
3*(4-5)+9/2
样例输出
Yes
注释
表达式长度
pascal括号匹配描述 给定一个算术表达式,检查其中的圆括号是否配对,给出适当信息(正好:Yes,左括号多:Left,右括号多:Right)输入格式 一行字符. 输出格式 三个信息之一.
program ex(input,output);
var a:char;left,right:0..255;
begin
left:=0;
right:=0;
a:='a';
while achr(10) do
begin
read(a);
if a='(' then left:=left+1
else if a=')' then right:=right+1;
end;
if left=right then writeln('Yes')
else if left