var n,i,d,m:longint;
s:string;
procedure giai;
var dong,mo,i:longint;
begin
readln(s);
d:=0; m:=0;
for i:=1 to length(s) do
begin
if s[i]=')' then inc(d)
else inc(m);
if d>m then
begin
writeln('NO');
exit;
end;
end;
if d=m then writeln('YES');
else writeln('NO');
end;
begin
assign(input, 'ngoac.inp');reset(input);
assign(output, 'ngoac.out');rewrite(output);
readln(n);
for i:=1 to n do
giai;
end.
* Chuyên dạy lập trình ONLINE cho học sinh THCS, THPT *.
Mọi giao lưu, trao đổi, xin liên hệ: Lê Quang Vinh - zalo: 037.803.8755.
Page: Lớp học Code Sky
Group FB1: Ôn thi HSG9 - THTB - TS10 chuyên tin
Group FB2: Học Scratch - Ôn thi Tin học trẻ bảng A
Thứ Tư, 27 tháng 4, 2022
NGOAC PASCAL
Đăng ký:
Đăng Nhận xét (Atom)
Không có nhận xét nào:
Đăng nhận xét
Lưu ý: Chỉ thành viên của blog này mới được đăng nhận xét.