Question

Написать и отладить программу по следующему условию: Дана целочисленная матрица А (m х n). Записать на место отрицательных элементов матрицы нули, на место положительных – единицы. Вывести изменённую матрицу.

Answer 1

===== PascalABC.NET =====

begin

 var (m, n) := ReadInteger2;

 var a := MatrRandom(m, n, -99, 99);

 a.Println;

 Writeln;

 a.Transform(p -> p <= 0 ? 0 : 1);

 a.Println

end.

Answer 2

var

 A: array[1..100, 1..100] of integer;

 i, j,n,m: integer;

begin

 Writeln('Введите N and M');

 Read(n,m);

 Randomize;

 Writeln('Исходная матрица');

 for i := 1 to N do

 begin

   for j := 1 to M do

   begin

     a[i, j] := Random(-100, 100);

     write(A[i, j]:5);

   end;

   writeln;

 end;

 Writeln('Измененная матрица');

 for i := 1 to N do

 begin

   for j := 1 to M do  

   begin

     if A[i, j] > 0 then a[i, j] := 1;

     if A[i, j] < 0 then a[i, j] := 0;

     Write(a[i, j]:5);

   end;

   Writeln;

 end;

end.

Answer 3

Для решения этой задачи, вам потребуется написать программу на выбранном вами языке программирования. Ниже приведен пример решения на языке Python:

pythonCopy code
def replace_elements(matrix):
    m = len(matrix)
    n = len(matrix[0])

    for i in range(m):
        for j in range(n):
            if matrix[i][j] < 0:
                matrix[i][j] = 0
            else:
                matrix[i][j] = 1

    return matrix


def print_matrix(matrix):
    for row in matrix:
        print(" ".join(map(str, row)))


if __name__ == "__main__":
    # Пример входной матрицы
    matrix = [
        [1, -2, 3],
        [0, -4, 5],
        [-6, 7, -8],
    ]

    print("Исходная матрица:")
    print_matrix(matrix)

    replace_elements(matrix)

    print("\nИзменённая матрица:")
    print_matrix(matrix)

Программа получает на вход двумерный список matrix, представляющий матрицу. Затем она проходит по каждому элементу матрицы, заменяя отрицательные элементы на 0 и положительные на 1. Измененная матрица выводится на экран.

Вы можете скопировать и выполнить этот код в среде программирования, поддерживающей Python, чтобы увидеть результат.