add question 4 9th list

lista-09/04/enunciado.txt

+Uma matriz inteira A n×n é considerada uma matriz de permutação se em cada linha e em cada coluna
+houver n - 1 elementos nulos e um único elemento igual a 1.
+
+Um exemplo de Matriz de permutação:
+
+|0 1 0 0|
+|0 0 1 0|
+|1 0 0 0|
+|0 0 0 1|
+
+Um exemplo de Matriz que não é de permutação:
+
+|2 -1 0|
+|-1 2 0|
+|0  0 1|
+
+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 de permutação, 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.
+
+Exemplo de entrada 1:
+3
+1 0 0
+0 1 0
+0 0 1
+
+Saı́da esperada para o exemplo acima:
+sim
+
+Exemplo de entrada 2:
+3
+1 0 0
+1 0 0
+0 1 0
+
+Saı́da esperada para o exemplo acima:
+nao