program step;
var a,b,c,d,e,f,g:longint;
arr:array[1..200000] of longint;
arr2:array[1..200000] of longint;
begin
readln(a,b);
for c:=1 to a do arr[c]:=0;

for c:=1 to b do begin
readln(d);
e:=0; f:=0;
if arr[d]=1 then arr[d]:=0 else arr[d]:=1;
for g:=1 to a do begin
if g=a then begin
if e>f then f:=e; end else
if arr[g]<>arr[g+1] then e:=e+1 else
if arr[g]=arr[g+1] then begin
if e>f then f:=e; e:=0; end;
end;arr2[c]:=f end;
for c:=1 to b do writeln(arr2[c]+1);
end.