热门

最新

红包

立Flag

投票

同城

我的

发布
community_717
CSDN-Ada助手
3 年前
truecommunity_717

满满的正能量,早晨起床,拥抱太阳,让身体充满,灿烂的阳光 ...

--------------------
【名人名言】“作为定律,软件系统在使用之前都不会运行得好,并在实际应用中错误不断。” – Dave Parnas,软件工程先驱

该内容已删除…

CSDN App 扫码分享
分享
评论
点赞
打赏
  • 复制链接
  • 举报
下一条:
program Ix_11;const man=20:var c: stingsfunction judge(c: string) : boolean;var starray[1. . maxn] of char;tOp.l:integer:ch: char;beginjudge: = true;top: =0;i:=1;ch: =cLi];while ch<>'@' do beginif (ch='(') or (ch=*)*) then case ch of'(' : begin top: =top+ 1;s[top]: ="(' end;")': if top>0 then top: = top-1else begin judge: = false; exit end;end;i: =i+1;ch: =cil:end;if top<>0 then judge: = false;end;begin (main)assign(input, ' match. in');assign (output, 'match. out');reset (input);rewrite(output);readIn(c) ;if judge(c) then writeln('YES') else writeln('NO');close (input);close(output);end.
立即登录