(PASCAL ABC) Дан двумерный массив a, размером (n´m). Заполнить одномерный
массив, найдя среднее арифметическое положительных элементов в каждом
столбце матрицы
Ответы
Ответ дал:
0
##
var (n, m) := ReadInteger2('Введите n и m:');
var a := MatrRandom(n, m, -99, 99);
a.Println(4);
Writeln;
var b := a.Cols.Select(col -> col.Where(p -> p > 0).DefaultIfEmpty.Average).ToArray;
b.Print
Приложения:
![](https://st.uroker.com/files/a87/a875d5f5e0167474560a47320ce6bebd.jpg)
Вас заинтересует
1 месяц назад
1 месяц назад
1 месяц назад
1 месяц назад
1 год назад
1 год назад
7 лет назад