ELEMENTOS EXCETO DIAGONAL SECUNDARIA

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

ALGORITMO "MATRIZ RESULTANTE TROCA DE LINHAS"
// Ler uma matriz quadrada de ordem 3 e a seguir deverão ser trocados entre si
// os valores da 1ª linha pelos respectivos valores da 3ª linha escrevendo ao
// final a matriz resultante.
var
A,B: VETOR [1..3,1..3] DE REAL
I, J: INTEIRO
SOMA: REAL
inicio
PARA I DE 1 ATE 3 PASSO 1 FACA
 PARA J DE 1 ATE 3 PASSO 1 FACA
 ESCREVA ("DIGITE O ELEMENTO (",I,",", J,") DA MATRIZ: ")
 LEIA (A[I,J])
 FIMPARA
FIMPARA
PARA I DE 1 ATE 3 PASSO 1 FACA
 PARA J DE 1 ATE 3 PASSO 1 FACA
 SE ((I+J)<>4)ENTAO
 B[I,J] <- A[I,J]
 FIMSE
 FIMPARA
FIMPARA
PARA I DE 1 ATE 3 PASSO 1 FACA
 PARA J DE 1 ATE 3 PASSO 1 FACA
 ESCREVAL ("A NOVA MATRIZ RESULTANTE É(",I,",", J,"): ", B[I,J])
 FIMPARA
FIMPARA
SOMA <- 0
PARA I DE 1 ATE 3 PASSO 1 FACA
 PARA J DE 1 ATE 3 PASSO 1 FACA
 SOMA <- SOMA + B[I,J]
 FIMPARA
FIMPARA
 ESCREVAL (SOMA)
fimalgoritmo