// PascalABC.NET 3.2, сборка 1488 от 21.06.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('*** Исходный массив ***');
var a:=MatrRandom(3,6,-99,99); a.Println(4);
var s:=a.ElementsWithIndexes.MinBy(x->x[0]);
Writeln('Минимальный элемент A[',s[1]+1,',',s[2]+1,']=',s[0]);
end.
Пример
*** Исходный массив ***
91 73 -71 -52 -58 68
37 -74 14 -58 -64 27
89 -62 14 -33 -9 78
Минимальный элемент A[2,2]=-74