Question

Найти сумму квадратов положительных членов матрицы MXN

Answer 1

PascalABC.NET 3.4.0, сборка 1672 от 10.06.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в матрице:');
  Writeln('*** Исходная матрица ***');
  var a:=MatrRandom(m,n,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  Writeln('Сумма положительных ',a.ElementsByRow.Where(t->t>0).Sum)
end.

Answer 2

Для нахождения суммы квадратов положительных элементов матрицы MxN, нужно выполнить следующие шаги:

1. Объявить матрицу MxN.
2. Пройтись по всем элементам матрицы.
3. Для каждого положительного элемента возвести его в квадрат и добавить к общей сумме.

Вот пример кода на Python:

pythonCopy code
def sum_of_positive_squares(matrix):
    # Инициализируем переменную для хранения суммы квадратов положительных элементов
    sum_of_squares = 0
    
    # Проходимся по всем элементам матрицы
    for row in matrix:
        for element in row:
            # Проверяем, является ли элемент положительным
            if element > 0:
                # Возводим элемент в квадрат и добавляем к общей сумме
                sum_of_squares += element**2

    return sum_of_squares

# Пример матрицы 3x3
matrix = [
    [1, -2, 3],
    [4, 5, -6],
    [-7, 8, 9]
]

# Вызываем функцию и выводим результат
result = sum_of_positive_squares(matrix)
print("Сумма квадратов положительных элементов матрицы:", result)

Замените содержимое матрицы matrix на свою собственную, чтобы получить сумму квадратов положительных элементов для вашей матрицы.