Cho một biểu thức chỉ có những dấu ngoặc đóng và mở, hãy kiểm tra xem sự đóng mở này có hợp lệ so với một biểu thức toán thông thường không? Ví dụ: ()(()) là hợp lệ, ())(() là không hợp lệ.
program p; uses crt; var s:string; i,t:longint; begin clrscr; readln(s); t:=0; for i:=1 to length(s) do if s[i]='(' then t:=t+1 else t:=t-1; if t= 0 then write(' hop le '); if t<>0 then write('khong hop le'); readln; end.
Dùng nick gmail để bình luận. Nếu lần đầu tiên bạn làm điều này thì hệ thống sẽ chuyển bạn sang trang blogger và hỏi bạn chọn tên hiển thị là gì. Bạn hãy nhập tên hiển thị rồi ok là được. Những lần bình luận sau hệ thống sẽ không hỏi nữa. Cảm ơn!
program p;
Trả lờiXóauses crt;
var s:string;
i,t:longint;
begin
clrscr;
readln(s); t:=0;
for i:=1 to length(s) do
if s[i]='(' then t:=t+1 else t:=t-1;
if t= 0 then write(' hop le ');
if t<>0 then write('khong hop le');
readln;
end.