Поиск в двумерном массиве (Паскаль)

Линейный поиск заключается в последовательном просмотре всех элементов и проверке их на соответствие условию поиска. Поиск прекращается либо после нахождения искомого элемента, либо после просмотра всех элементов массива.

Поиск в двумерном массиве реализуется с помощью вложенного цикла. Наружный цикл работает по всем строкам (столбцам) массива, а внутренний – по всем элементам выбранной строки (столбца).

Пример. На вход подаётся исходный двумерный массив и строка в виде одномерного массива. Составьте функцию по нахождению номера строки в двумерном массиве, которая соответствует строке одномерного массива.
Программный код:
function F (m: array of array of integer; a: array of integer): integer;
begin
  for var i := 0 to 4 do begin
    var found := true;
    for var j := 0 to 1 do
      if m [i] [j] <> a [j] then begin
        found := false;
        break; end;
    if found then begin Result := i + 1; exit; end;
  end;
  Result := -1;
end;