Question

Напишите плиз, 3 вариант!!!!
Тема: Поиск элементов массива, удовлетворяющих заданному условию

Answer 1

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

begin
  Writeln('*** Исходный массив ***');
  var z:=MatrRandom(4,6,10,80);
  z.Println(4); Writeln(4*z.ColCount*'-');
  var t:=z.ElementsWithIndexes.MaxBy(x->x[2]);
  Writeln('Максимальный элемент z[',t[0]+1,',',t[1]+1,']=',t[2])
end.

Пример
*** Исходный массив ***
  47  18  64  34  29  42
  68  55  80  68  44  34
  15  51  43  75  32  52
  21  38  36  48  58  69
------------------------
Максимальный элемент z[2,3]=80