Дано натуральное число. Если в нём есть цифры a и b, то определить какая из них расположена в числе правее. Если одна или обе эти цифры встречаются в числе несколько раз, то должны быть учтены самые правые из одинаковых цифр. (паскаль)

Var
   a,b,n:string;
   i:integer;
begin
write(Введите n: );
readln(n);
write(Введите a: );
readln(a);
write(Введите b: );
readln(b);
for i:=length(n) downto 1 do
  if (n[i]=a) or (n[i]=b) then
     begin
    writeln(Правее ,n[i]);
    halt;
    end;
end.