错误代码如下：

max:=0;

for i := 0 to n-2 do

begin

def[i]:=a[i]-i-1;

inc(con[def[i]]);

end;

def[n-1]:=a[n-1]-1;

inc(con[def[n-1]]);

for i := 0 to n do

if con[i]>max then

max:=con[i];

dec(con[def[n-1]]);

def[n-1]:=a[n-1]-n-1-1;

def[0]:=-(n+a[0]);

inc(con[def[0]]);

for i := 0 to n do

if con[i]>max then

max:=con[i];

知道错在这块可是该怎么改？都和标准数据只差1~2……RP……