CALCULOS COM MATRIZ visualg

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

Algoritmo "calculos com matriz"
// Disciplina : [Linguagem e Lógica de Programação]
// Professor : Antonio Carlos Nicolodi 
// Descrição : Aqui você descreve o que o programa faz! (função)
// Autor(a) : Nome do(a) aluno(a)
// Data atual : 27/06/2019
Var
// Seção de Declarações das variáveis 
 matrizcalcular: vetor[1..3,1..3] de inteiro
 linha,coluna,somadiagonal,somalinha2,maiorterceiracoluna:inteiro
 maiorcoluna2,maiorcoluna1,somadiagonal2:inteiro
 
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
somadiagonal:= 0
somalinha2:=0
 para linha:=1 ate 3 faca
 para coluna:=1 ate 3 faca
 escreva("Digite o valor da posicao","[",linha,coluna,"]")
 leia(matrizcalcular[linha,coluna])
 se (linha = coluna) entao
 somadiagonal:=somadiagonal+matrizcalcular[linha,coluna]
 fimse
 fimpara
 fimpara
 
 //mostra a matrix estruturada
 para linha:=1 ate 3 faca
para coluna:=1 ate 3 faca
escreva(matrizcalcular[linha,coluna])
fimpara
escreval()
fimpara
para coluna:=1 ate 3 faca
somalinha2:=somalinha2 + matrizcalcular[2,coluna]
fimpara
para linha de 1 ate 3 faca
se (matrizcalcular[linha,3] > maiorterceiracoluna) entao
 maiorterceiracoluna:=matrizcalcular[linha,3]
 fimse
 fimpara
 //maior numero da 2 linha
 para linha de 1 ate 3 faca
se (matrizcalcular[linha,2] > maiorcoluna2) entao
 maiorcoluna2:=matrizcalcular[linha,2]
 fimse
 fimpara
 para linha de 1 ate 3 faca
se (matrizcalcular[linha,1] > maiorcoluna1) entao
 maiorcoluna1:=matrizcalcular[linha,1]
 fimse
 fimpara
 
 
escreval("------------------------------------------------")
escreval("Maior da Primeira coluna",maiorcoluna1)
escreval("------------------------------------------------")
escreval("Maior da terceira coluna",maiorterceiracoluna)
escreval("------------------------------------------------")
escreval("Maior da segunda coluna ",maiorcoluna2)
escreval("-----------------------------------------------")
escreval("Soma da segunda linha ",somalinha2)
escreval("-----------------------------------------------")
escreval("Soma da diagonal principal ",somadiagonal)
Fimalgoritmo