Question

Дана целочисленная квадратная матрица проверьте являются ли все числа расположенные ниже главной и побожной диагоналей одинаковыми

Answer 1

Var
   A:array[1..13,1..13] of integer;
   i,j,n,M,k,C:integer;
Begin
Randomize;
N:=Random(13)+1;
M:=N div 2 +2;
WriteLn('Исходный массив(',N,'):');
For i:= 1 to N do
    Begin
    For j:= 1 to N do
        Begin
        A[i,j]:=random(N*2+1)-N;
        Write(A[i,j]:3,' ');
        End;
    WriteLn
    End;
k:=1;
if (N>2) then
   Begin
   C:=A[M,N-M+2];
   For i:= M to N do
       For j:= N-i+2 to i-1 do
           if A[i,j] <> C then k:=0;
   if k <> 0 then WriteLn('Да')
   else WriteLn('Нет')
   End
else WriteLn('В массиве нет элементов ниже главной и побочной диагоналей.');
End.

Answer 2

Для проверки, являются ли все числа, расположенные ниже главной и побочной диагоналей, одинаковыми в данной целочисленной квадратной матрице, можно использовать следующий алгоритм:

1. Проверьте, что матрица является квадратной, то есть количество строк и столбцов одинаково. 2. Пройдитесь по каждому элементу матрицы, расположенному ниже главной диагонали (элементы с индексами (i, j), где i > j). 3. Сравните каждый элемент с элементом, расположенным на соответствующей позиции над побочной диагональю (элементы с индексами (j, i), где i > j). 4. Если хотя бы одна пара элементов не равна, то все числа, расположенные ниже главной и побочной диагоналей, не являются одинаковыми. В противном случае, все числа будут одинаковыми.

Ниже приведен пример кода на языке Python, который реализует этот алгоритм:

def check_diagonal_elements(matrix):
    n = len(matrix)  # Размерность матрицы
    for i in range(n):
        for j in range(i+1, n):
            if matrix[i][j] != matrix[j][i]:
                return False
    return True

# Пример использования
matrix = [[1, 2, 3],
          [4, 5, 6],
          [7, 8, 9]]

result = check_diagonal_elements(matrix)
print(result)  # Выводит False, так как числа ниже главной и побочной диагоналей не являются одинаковыми

В этом примере функция `check_diagonal_elements` принимает матрицу в качестве аргумента и возвращает `True`, если все числа ниже главной и побочной диагоналей одинаковы, и `False` в противном случае.

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