План действий 1. Прочитай текст. Пете на день рождения подарили конструктор из деревянных кубиков разной - id1780754420221219 от anonimka2018oz5x7j 19.12.2022 13:15

Question

Информатика: План действий 1. Прочитай текст. Пете на день рождения подарили конструктор из деревянных кубиков разной формы. Он решил пригласить Андрея и с ним вдвоём что-нибудь построить из кубиков Мальчики договорились построить высотный дом. Дом получился очень красивый управляющий объект- объект управления- цель управления- ​

anonimka2018oz5x7j · Accepted Answer

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

begin
Writeln('*** Исходная матрица ***');
var a:=MatrRandom(4,8,-99,99);
a.Println(4); Writeln(4*a.ColCount*'-');
var sa:=a.Rows.SelectMany(x->x);
Writeln('Положительные элементы:');
sa.Where(x->x>0).Println;
Write('Максимальный по модулю элемент: ',sa.Max(x->abs(x)));
end.

Пример
*** Исходная матрица ***
80 9 -8 32 37 75 43 -72
71 -79 94 -20 -64 -37 -98 53
19 84 -63 -4 17 5 38 -86
-32 56 87 -43 28 -40 -35 24

Положительные элементы:
80 9 32 37 75 43 71 94 53 19 84 17 5 38 56 87 28 24
Максимальный по модулю элемент: 98

MOGZ ответил