首先找到b的位置x,要求满足b为中位数的数列把比b大的设为1,比b小设为-1则数列满足条件则x 左边的的和+x右边的和=0 然后应该就很好搞了 ..] of longint; i,n,m,x,k,ans:longint; begin readln(n,m); to n do begin read(x); if x=m then k:=i ; end; l[n]:=; r[n]:=; do begin s[i]:=s[i+]+a[i]; inc(l[s[i]+n]); end; to n do b…