var str1,str2,res:string;
    i1,i2:integer;
    add:boolean;
begin
 str1:='123456543';
 str2:='1234567890';
 res:='';
 for i2:=1 to length(str2) do
 begin
  add:=true;
  for i1:=1 to length(str1) do if str2[i2]=str1[i1] then add:=false;
  if add then res:=res+str2[i2];
 end;
 writeln(res);
 readln;
end.