题解 CF978A 【Remove Duplicates】

「已注销」

于 2020-10-01 10:18:56 发布

阅读量208

点赞数

CC 4.0 BY-SA版权

本文链接：https://blog.youkuaiyun.com/wzy_jr/article/details/108893543

$Problems\text{Problems}$

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

$Answer\text{Answer}$

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

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

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

$Code\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.