Найти минимальный элемент массива а (3.6) . ,

кхммммм кхммммм    3   02.09.2019 19:40    0

Ответы
alexandrvseznaika alexandrvseznaika  06.10.2020 13:02
// 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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика