Exercícios - vetores e matrizes

1ª) Questão: Escrever um algoritmo para ler uma matriz (7,4) contendo valores inteiros (supor que os valores são distintos). Após, encontrar o menor valor contido na matriz e sua posição.

Resposta:

algoritmo "Vetores e Matrizes - exercício 4"
// Função : mostrar o menor valor e a posição
// Autor : MERVALDO MACHADO
// Data : 24/11/2011
// Seção de Declarações var i,j,LINHA,COLUN:INTEIRO
VALOR:VETOR[1..7,1..4] DE INTEIRO
MENORVALOR:REAL
inicio
MENORVALOR<-10000
PARA i DE 1 ATE 7 FACA PARA j DE 1 ATE 4 FACA ESCREVA("Entre com o valor da linha ",i," coluna ",j,": ") LEIA (VALOR[i,j]) FIMPARA
FIMPARA
PARA i DE 1 ATE 7 FACA PARA j DE 1 ATE 4 FACA SE (MENORVALOR>VALOR[i,j]) ENTAO MENORVALOR<-VALOR[i,j] LINHA<- i COLUN<- j FIMSE
FIMPARA
FIMPARA
ESCREVA("O menor valor é ",MENORVALOR,", ele está na posição ",LINHA," , ",COLUN,".") fimalgoritmo 2ª) Questão: Escreva um algoritmo que lê uma matriz M(5,5) e calcula as somas:

a) da coluna 2 de M.
b) da diagonal principal.
c) de todos os elementos da matriz.
d) Escreva estas somas e a matriz.

Resposta: algoritmo "Vetores e Matrizes - exercício 5"
// Função : exibe as somas: da coluna 2 de M, da diagonal principal e de todos os elementos da matriz.
// Autor : MERVALDO MACHADO
// Data : 24/11/2011
// Seção de Declarações var i,j:INTEIRO
VALOR:VETOR[1..5,1..5] DE INTEIRO
SOMA,SOMAD,SOMAT:REAL
inicio
SOMA<-0
SOMAD<-0
SOMAT<-0
PARA i DE 1 ATE 5 FACA PARA j DE 1 ATE 5 FACA ESCREVA("Entre com o valor da linha ",i," coluna ",j,": ") LEIA (VALOR[i,j]) FIMPARA SOMA<-SOMA+VALOR[i,2]
FIMPARA
PARA i DE 1 ATE 5 FACA PARA j DE 1 ATE 5 FACA SE i=j ENTAO SOMAD<-(SOMAD+VALOR[i,j]) FIMSE FIMPARA
FIMPARA
PARA i DE 1 ATE 5 FACA PARA j DE 1 ATE 5 FACA SOMAT<-(SOMAT+VALOR[i,j]) FIMPARA
FIMPARA
PARA i DE 1 ATE 5 FACA
ESCREVAL(VALOR[i,1]," ",VALOR[i,2]," ",VALOR[i,3]," ",VALOR[i,4]," ",VALOR[i,5])
FIMPARA