Question

Найти минимальный элемент массива а (3.6) .очень срочно,помогите пожалуйста

Answer 1

// PascalABC.NET 3.2, сборка 1467 от 02.06.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(3,6,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var t:=a.ElementsWithIndexes.MinBy(x->x[2]);
  Writeln('Min: A[',t[0]+1,',',t[1]+1,']=',t[2])
end.

Пример
*** Исходный массив ***
 -30  55  92  98  96  29
 -41 -11 -94  72  -3 -91
  64  48  10  10 -85  91
------------------------
Min: A[2,3]=-94