Составьте программу нахождения наименьшего элемента двухмерного массива А(N,M), большего данного Т

Нужно, чтобы программа запустилась в PascalABC

Очень

НикитаСекретчик НикитаСекретчик    2   06.04.2020 08:26    2

Ответы
Pentianоs Pentianоs  12.10.2020 16:29

begin

 var (n, m) := ReadInteger2('Укажите n и m:');

 var массив := MatrRandom(n, m, -99, 99);

 массив.Println;

 var t := ReadInteger('Введите T:');

 массив.ElementsByRow.Where(элемент -> элемент > t).Min.Print

end.


Составьте программу нахождения наименьшего элемента двухмерного массива А(N,M), большего данного Т Н
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика