裸平衡树,恢复手感用的 //By BLADEVIL var n :longint; i :longint; x, y :longint; t, tot :longint; key, s, left, right :..] of longint; ft :longint; a, b :longint; ans :longint; procedure right_rotate(var t:longint); var k :longint; begin k:=left[t]; left[t]:=rig…