Задана матрица размером n×m. Найти максимальный по модулю элемент матрицы
// PascalABC.NET 3.4.2, сборка 1790 от 15.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (n,m):=ReadInteger2(Количество строк и столбцов в матрице:);
Writeln(*** Исходная матрица ***);
var a:=MatrRandom(n,m,-99,99);
a.Println(4); Writeln(4*a.ColCount*-);
Println(max =,a.ElementsByRow.MaxBy(t-gt;Abs(t)))
end.
#include lt;iostreamgt;
#include lt;cmathgt;
#include lt;algorithmgt;
int main()
{
size_t
N, M;
std::cin gt;gt; N gt;gt; M;
int** arr = new int*[N];
for(int i = 0; i lt; N; i++)
arr[i] = new int [M];
for(int i = 0; i lt; N; i++)
for(int j = 0; j lt; M; j++)
std::cin gt;gt; arr[i][j];
size_t max(abs(arr[0][0]));
for(int i = 0; i lt; N; i++)
std::for_each(arr[i], arr[i]+M, [amp;max](autoamp; var)
{
if(abs(var) gt; max)
max = abs(var);
});
std::cout lt;lt; "Максимальный элемент по модулю: " lt;lt; max lt;lt; std::endl;
for(int i = 0; i lt; N; i++)
delete[] arr[i];
delete[] arr;
}

Другие вопросы в разделе - Информатика

Iook Lia Sister in in the перевести на русский ...
2018-09-23 00:00:00

Условия, при которых химическое равновесие смещается вправо для реакции ...
2018-09-23 00:00:00

Примеры ситуаций в которых информация собирается обрабатывается упрощается создается ...
2018-09-23 00:00:00

Halloween party is impossible without costumes. What costumes are ...
2018-09-23 00:00:00