Это даже не "вышка", это баловство какое то ...
Предполагается, что матрица A существует и заполнена а также её размерность известна и задана числом N
Код:
Присвоить I 1
Пока I<N
Присвоить J 1
Пока J< N
Если J<I
Присвоить элементу матрицы C[I,J] значение элемента матрицы A[I,J]
Иначе
Присвоить элементу матрицы C[I,J] значение элемента матрицы -A[I,J]
Увеличить J на 1
Конец цикла по J
Увеличить I на 1
Конец цикла по I