Cho trước một xâu chứa biểu thức dấu ngoặc hợp lệ. Ai đó đã vô tình xóa đi 1 dấu ngoặc, khiến cho biểu thức dấu ngoặc không còn hợp lệ nữa. Hãy tìm vị trí bị xóa và thêm vào dấu ngoặc ấy để được biểu thức đúng ban đầu.
rogram p; uses crt; var s:string; t,i:longint; begin clrscr; readln(s); 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 begin if t>0 then begin s:=s+')'; t:=t-1; write(s); end; if t<0 then begin s:=s[1]+'('; t:=t+1; write(s); end; end; 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!
rogram p;
Trả lờiXóauses crt;
var s:string;
t,i:longint;
begin
clrscr;
readln(s);
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
begin
if t>0 then
begin
s:=s+')';
t:=t-1;
write(s);
end;
if t<0 then
begin
s:=s[1]+'(';
t:=t+1;
write(s);
end;
end;
readln;
end.