var v:array[1..100]of longint; n,i,x,j,s:longint; begin read(n); read(x); for i:=1 to n do read(v[i]); for i:=1 to n do if v[i]=x then begin for j:=i+1 to n do begin v[j-1]:=v[j]; end; n:=n-1; end; for i:=1 to n do If v[i]=x then s:=s+1; If s=n then write else for i:=1 to n do write(v[i],' '); end.