题解 CF978A 【Remove Duplicates】

$\text{Problems}$

对于一个数组，做以下操作： 对于每个元素，只保留该元素在该数组中最右边的一个，删去其余相同元素。

$\text{Answer}$

看到数据范围$1\le n\le 50$，基本就是暴力枚举了。

从后往前扫，并判断前面是否出现过这个数，如果出现过，则不加入$b$数组；如果没出现过，则$\text{m++,b[m]=a[i]}$。

最后输出$m$并倒叙输出$b$数组即可。

$\text{Code}$

var
  n,i,j,m:longint;
  a,b:array[0..51] of longint;
  p:boolean;
begin
  readln(n);
  for i:=1 to n do read(a[i]);//读入a数组
  for i:=n downto 1 do//从后往前扫
    begin
      p:=true;//反证法
      for j:=i+1 to n do if a[i]=a[j] then p:=false;//如果出现过，则不加入
      if p then begin inc(m);b[m]:=a[i];end;//如果没出现过，则加入b数组
    end;
  writeln(m);
  for i:=m downto 1 do write(b[i],' ');//倒序输出！！！
end.