Помогите пожалуйста решить задачу с массивами.

[katbka]

Даны матрица А(n*m) и вектор В(n). Получить два новых вектора С(n) и D(n). В вектор С поместить индекс первого вхождения элемента вектора В в соответствующую строку исходной матрицы. В вектор D поместить индекс последнего вхождения элемента вектора В в соответствующую строку исходной матрицы. Если в строке матрицы элемент из вектора В отсутствует, то в соответствующие элементы векторов С и D записать нули.

Объясните пожалуйста, что собственно требуется сделать? Текс запутан. мне понять сложно. Заранее всем спасибо.

[eoln]

const
  n = 5;
  m = 10;
var
  mas: array[1..n, 1..m] of integer;
  B, C, D: array[1..n] of integer;
  i, j: byte;
begin
  randomize;
  for i := 1 to n do
  begin
    for j := 1 to m do
    begin
      mas[i, j] := random(9) + 1; //заполнение
      write(mas[i, j]:3) //и вывод на экран матрицы A
    end;
    writeln
  end;
  writeln; write('B = ');
  for i := 1 to n do begin
    B[i] := random(9) + 1; //заполнение
    write(B[i]:3) //и вывод на экран вектора B
  end;

  for i := 1 to n do
  begin
    for j := 1 to m do
    begin
      if mas[i, m - j + 1] = B[i] then C[i] := m - j + 1;
      if mas[i, j] = B[i] then D[i] := j
    end;
  end;

  writeln; write('C = ');
  for i := 1 to n do write(C[i]:3);//вывод на экран вектора C
  writeln; write('D = ');
  for i := 1 to n do write(D[i]:3);//вывод на экран вектора D
  readln
end.

if mas[i, m - j + 1] = B[i] then C[i] := m - j + 1; Идея такая - идём с конца строки и если нашли совпадение, то запоминаем его позицию. В итоге последнее запомненное будет первым.
if mas[i, j] = B[i] then D[i] := j Идея такая - идём с начала строки и если нашли совпадение, то запоминаем его позицию. В итоге последнее запомненное будет последним.
Это не самый быстрый способ, но код компактнее получается.

[katbka]

большое вам спасибо!