Pascal. Найти номер строчки,в которой находится малый элемент двумерного массива

Номер строчки первого попавшегося из минимальных либо все номера строк с равными наименьшими значениями (к примеру 3 раза повторяется число 0, которое является наименьшим в двумерной матрице)?

Const
   N = 3;
   M = 4;
Var
   A:array[1..N,1..M] of integer;
   i,j,Min,Ns:integer;
Begin
Заполнение массива
WriteLn('Начальный массив: ');
For i:= 1 to N do
    Begin
    For j:= 1 to M do
        Begin
        A[i,j]:=random(21)-10;
        Write(A[i,j]:3,' ');
        End;
    WriteLn
    End;
Поиск малого элемента
Min:=A[1,1];
For i:= 1 to N do
    For j:= 1 to M do
        if A[i,j]lt;Min then
           Begin
           Min:=A[i,j];
           Ns:=i;
           End;
WriteLn('Малый элемент в строке ',Ns);
End.