Uma matriz quadrada A n×n é considerada triangular quando os elementos que estão acima da sua diagonal principal são todos nulos (matriz triangular inferior) ou quando os elementos que estão abaixo de sua diagonal principal são todos nulos (matriz triangular superior). Vejamos dois exemplos de matrizes triangulares:
|9 8 7 6|
|0 6 7 3|
|0 0 2 5|
|0 0 0 1|
Matriz triangular Superior.
|6 0 0 0|
|3 0 0 0|
|0 4 7 0|
|7 5 2 1|
Matriz triangular Inferior.
Faça um programa em Free Pascal que leia um inteiro positivo n, sendo 1 ≤ m, n ≤ 100, e uma matriz inteira A n×n . O programa deve imprimir “sim” caso a matriz A seja triangular, caso contrário deve imprimir “nao”.
Nos casos de teste cada elemento x da matriz A é definido por 0 ≤ x ≤ 100.
PS: Seu programa deve encerrar a execução assim que descobrir se a propriedade definida foi atendida ou não.