บนพื้นฐาน นี้คำถาม

กำหนดสตริงแทนที่แต่ละวงเล็บ()[]{}<>ด้วยวงเล็บของประเภทที่เหมาะสมเพื่อให้วงเล็บจับคู่และรอบซ้อนกันวงเล็บดังนี้

1. สิ่งที่อยู่นอกสุดคือ ()
2. ()ควรจะอยู่ข้างในโดยตรง[]
3. []ควรจะอยู่ข้างในโดยตรง{}
4. {}ควรจะอยู่ข้างในโดยตรง<>
5. ด้านในตรงจาก<>จะเป็น()อีกครั้ง (รอบ)

ตัวอักษรที่ไม่ใช่วงเล็บทั้งหมดจะต้องคงอยู่เหมือนเดิม วงเล็บเปิดอาจถูกแทนที่ด้วยวงเล็บเปิดบางชนิดเท่านั้นและปิดวงเล็บด้วยวงเล็บปิด

อินพุตจะทำให้เป็นไปได้เสมอ นี่หมายความว่าวงเล็บนั้นจับคู่อย่างถูกต้องหากไม่ระบุประเภท ดังนั้น{ab<)c]เป็นอินพุตที่ถูกต้อง แต่มีab)(cdหรือab((cdไม่

ตัวอย่าง:

2#jd {¤>. = 2#jd (¤).
abcdef    = abcdef
(3×5+(4-1)) = (3×5+[4-1])
<<<>><<>><<<<<<>>>>>>> = ([{}][{}][{<([{}])>}])

ไม่อนุญาตให้ใช้การแปลงดั้งเดิมของอินพุตด้วยวิธีนี้ (ไวยากรณ์ภาษาอัตโนมัติ)

เช่นเคย: รหัสที่สั้นที่สุดชนะ

JavaScript (ES6), 79 ไบต์

s=>s.replace(/./g,c=>~(p=l.indexOf(c))?l[p&4?--k&3|4:k++&3]:c,l='([{<)]}>',k=0)

กรณีทดสอบ

let f =

s=>s.replace(/./g,c=>~(p=l.indexOf(c))?l[p&4?--k&3|4:k++&3]:c,l='([{<)]}>',k=0)

console.log(f("2#jd {¤>."));
console.log(f("abcdef"));
console.log(f("(3×5+(4-1))"));
console.log(f("<<<>><<>><<<<<<>>>>>>>"));

เล็ก ๆ 132 ไบต์

%{
int i,o[4]={40,91,123,60};
%}
%%
[[({<] {putchar(o[i++&3]);}
[])}>] {putchar(o[--i&3]+2-!(i&3));}
%%
yywrap(){}
main(){yylex();}

Java, 155 ไบต์

a->{String s="([{<)]}>";for(int i=0,j=0,k;i<a.length;i++){k=s.indexOf(a[i]);if(k>3){a[i]=s.charAt(--j%4+4);}else if(k>-1){a[i]=s.charAt(j++%4);}}return a;}

แลมบ์ดาที่รับเรื่องchar[]นี้เป็นข้อโต้แย้งเดียว เราวนรอบอาร์เรย์โดยเก็บตำแหน่งไว้ในสตริงของวงเล็บ ( s) ในตัวแปร ( k) เราตรวจสอบว่ามันเป็นวงเล็บเปิดหรือปิด ( s.indexAt()) และแทนที่ด้วยวงเล็บที่เหมาะสมตามระดับของการซ้อน ( s.charAt()) โดยวนซ้ำอย่างเหมาะสม%4

Haskell, 126 ไบต์

b="([{<"
d=")]}>"
y=cycle
(!)=elem
f(e:c)n(x:r)|x!b=y b!!n:f(y d!!n:e:c)(n+1)r|x!d=e:f c(n-1)r|1<3=x:f(e:c)n r
f c n s=s
f" "0

ลองใช้กับ ideone การใช้งาน:

*Main> f" "0 "<<<>><<>><<<<<<>>>>>>>"
"([{}][{}][{<([{}])>}])"

คำอธิบาย

fใช้เวลาสามข้อโต้แย้ง: สตริงที่ทำงานเป็นสแต็คสำหรับการปิดวงเล็บ int nสำหรับการนับความลึกการทำรังและสตริงการป้อนข้อมูล

f c n "" = ""                            -- base case for recursion: input string is empty
f (e:c) n (x:r)                          -- for the current char x
   | elem x "([{<" =                     -- check if it is an opening bracket
       (cycle "([{<")!!n :               --   if so, replace it with a bracket of the current nesting depth
           f ((cycle ")]}>")!!n : e : c) --   push the matching closing bracket on the stack
               (n+1) r                   --   increase depth level and check the next char
   | elem x ")]}>" =                     -- if x is a closing bracket
       e :                               --   replace it by the closing bracket from on top of the stack
           f c (n-1) r                   --   decrement depth level and check the next char
   | otherwise     = x : f (e:c) n r     -- otherwise keep x and check the next char