Паскаль,формирование массивов.

[Amenus]

По задаче нужно сформировать массив С ,содержащий повторяющиеся элементы массива А с нечетными номерами, которые присутствуют в массиве В в одном экземпляре.
Подскажите,пожалуйста.

[alex_fcsm]

Условие: составить массив С из нечетных элементов массива А, которые встречаются в массиве B только 1 раз.

Задача несложная покажите хоть что у Вас получилось.
как приммер:

for i:=1 to n do
 if i mod 2 =1 then begin
      {посчитать сколько раз встречается в массиве b a[i]}
       {если 1 раз то добавить}
     end;

[Amenus]

alex_fcsm, я сейчас просто не могу понять ход решения.Был бы признателен за код главного процесса.

[alex_fcsm]

Единственное что упустил: в массиве А нужно чтобы искомый элемент встречался больше 1 раза

повторяющиеся элементы массива А

uses crt;
const n=20;
var a,b,c:array[1..n] of char;
    i,j,k,m,len:byte;
    
begin
for i:=1 to n do
 begin
  a[i]:=chr(65+random(25));
  b[i]:=chr(65+random(25));
 end;
  len:=0;
 for i:=1 to n do
 if i mod 2 =1 then
    begin
       m:=0;
       for j:=1 to n do
        if a[i]=a[j] then inc(m);
         if m>1 then begin
            k:=0;
             for j:=1 to n do
              if a[i]=b[j] then inc(k);
            if k=1 then begin
                   inc(len);
                   c[len]:=a[i];
                      end;
                   end;
     end;
write('A:');
for i:=1 to n do
 write(a[i],' ');
 writeln;
 write('B:');
 for i:=1 to n do
 write(b[i],' ');
 writeln;
 write('C:');
 for i:=1 to len do
 write(c[i],' ');
 writeln;
end.

P.S. Я решил что элементы буквы

[Amenus]

alex_fcsm,там цифпы,но смысл понятен)Спасибо огромное!