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

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

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

Пример. На вход подаётся исходный двумерный массив и строка в виде одномерного массива. Составьте функцию по нахождению номера строки в двумерном массиве, которая соответствует строке одномерного массива.
Программный код:
function linearCheck (mas: array [1..5, 1..2] of integer; arr: array [1..2] of integer): integer;
var i, j: integer;
begin
  for i := 1 to 5 do begin
    for j := 1 to 2 do
      if mas [i, j] <> arr [j] then break;
      if j > 2 then begin linearCheck := i; exit; end;
  end;
  linearCheck := -1;
end;