Question

Задан двухмерный массив A (матрица) вещественных чисел размерности 35.
Получить из него новый массив V путем удаления из массива A строки и
столбца, в которых содержится минимальный элемент.
Написать программу в паскаль

Answer 1

uses School, NumLibABC;

begin

 Println('PascalABC.NET', PascalABCVersion);

 var a := new Matrix(MatrRandomReal(3, 5, -99, 99, 1));

 a.Println(7,1);

 Writeln;

 var min := a.Value.ElementsWithIndices.MinBy(p -> p[0]);

 a.DeleteRow(min[1]+1);

 a.DeleteCol(min[2]+1);

 var v := a.Value;

 v.Println(7,1)

end.