найти минимальный элемент матрицы L(15,15)
программа паскаль

Program asd;Const   N=15;   M=15;Var   l:array [1..15,1..15] of integer;   min,i,j,k,k1:integer;Begin   min:=l[1,1];   Writeln('Введите элементы матрицы:');   For i:=1 to n do      For j:=1 to m do         Begin         Write('L[',i,',',j,']=');         Readln(l[i,j]);         If l[i,j]<min then begin min:=l[i,j]; k:=i; k1:=j; end;      End;   Writeln('Минимальный элемент L[',k,',',k1,']= ',min);End.