Question

Дана матрица 5*7.Элементы матрицы целые случайные числа в интервале [-18;+48].Вывести матрицу и найти: 1)разность между средним арифметическим положительных элементов матрица и средним арифметическим отрицательных элементов матрицы;

Answer 1

//PascalABC.Net 3.2
begin
var a: array of array of integer;
var n:=readinteger('Строк матрицы: ');
var m:=readinteger('Столбцов матрицы: ');
setLength (a, n);
for var i:=0 to length(a)-1 do a[i]:=arrRandom (m, -18, 48);
var sumP:=0; var sumO:=0; var kolO:=0;
for var i:=0 to n-1 do for var j:=0 to m-1 do
if a[i][j]<0 then begin
sumO+=a[i][j];
kolO+=1;
end else sumP+=a[i][j];
writeln ('Разница: ', sumP/(m*n-kolO)-sumO/kolO);
end.

Answer 2

Я могу помочь вам с вашим запросом. Вот код на Python, который решает вашу задачу:

# Импортируем модуль для работы с матрицами
import numpy as np

# Создаем матрицу 5*7 из целых случайных чисел в интервале [-18; 48]
matrix = np.random.randint(-18, 49, size=(5, 7))

# Выводим матрицу на экран
print("Матрица:")
print(matrix)

# Находим среднее арифметическое положительных элементов матрицы
pos_mean = np.mean(matrix[matrix > 0])

# Находим среднее арифметическое отрицательных элементов матрицы
neg_mean = np.mean(matrix[matrix < 0])

# Находим разность между средними арифметическими положительных и отрицательных элементов матрицы
diff = pos_mean - neg_mean

# Выводим результат на экран
print("Разность между средним арифметическим положительных элементов матрицы и средним арифметическим отрицательных элементов матрицы:")
print(diff)

Надеюсь, это было полезно для вас. Если у вас есть другие вопросы, я буду рад ответить на них.