Помогите написать пожалуйста программу в Паскале Двумерные массивы 1) Дана целочисленная прямоугольная матрица. Определить сумму элементов тех строк, которые содержат хотя бы один отрицательный элемент. 2) Определите количество строк в матрице, в которых числа принадлежат отрезку [a,b].
Ответы
Ответ дал:
0
PascalABC.NET
Ответ:
- begin
- var m := MatrRandom(5, 8, -99, 99).Print;
- m.Rows.Where(r -> r.Any(x -> x<0)).PrintLines(r -> r.Sum);
- var (a, b) := ReadInteger2('Введите a, b:');
- m.Rows.Count(r -> r.All(x -> x in a..b)).Print
- end.
Пример работы:
Приложения:
![](https://st.uroker.com/files/83c/83cc5d193faef6e361921302684d68ac.jpg)
Вас заинтересует
1 год назад
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад