
Найдите сумму и количество элементов каждой строки больше среднего арифметического


Ответы на вопрос

Const n=3; m=3;
Var A:array[1..n, 1..m] of integer;
i,j,s,s1,k:integer; sr:real;
BEGIN
Writeln('Массив А: ');
For i:=1 to n do
begin
s:=0;
for j:=1 to m do
begin
A[i,j]:=Random(10);
Write(A[i,j]:2);
s:=s+A[i,j];
sr:=s/i;
end;
Writeln;
end;
Writeln;
k:=0;
For i:=1 to n do
begin
s1:=0;
for j:=1 to m do
If A[i,j]>sr then
begin
inc(k);
s1:=s1+A[i,j];
end;
Writeln('Сумма строки №',i,' : ',s1);
end;
Writeln('Сред. ариф. массива: ',sr:2:2);
Writeln('Количество: ',k);
END.



Для решения этой задачи, нам нужно выполнить следующие шаги:
1. Найти среднее арифметическое значение каждой строки. 2. Найти элементы каждой строки, которые больше среднего арифметического. 3. Посчитать их количество и сумму.
Давайте рассмотрим пример на Python:
```python # Исходная матрица matrix = [ [1, 2, 3, 4], [5, 6, 7, 8], [9, 10, 11, 12] ]
# Находим среднее арифметическое значение каждой строки average_values = [sum(row) / len(row) for row in matrix]
# Находим элементы каждой строки, которые больше среднего арифметического result = [] for i in range(len(matrix)): current_row = matrix[i] current_average = average_values[i] elements_above_average = [element for element in current_row if element > current_average] result.append({ "row": i, "sum": sum(elements_above_average), "count": len(elements_above_average) })
print(result) ```
Результат выполнения этого кода будет содержать сумму и количество элементов каждой строки, которые больше среднего арифметического.


Топ вопросов за вчера в категории Информатика







Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili