Baixe INFORMATICA EXERCICIOS DE MATRIZ E VETOR e outras Exercícios em PDF para Informática, somente na Docsity!
Rafael Ferreira RA- 1676559
1) Leia uma matriz 6 x 6 e atribuir o valor 0 para os valores negativos encontrados. algoritmo "Ex1" var mat: vetor[1..6,1..6] de inteiro L,C:inteiro inicio //Leitura da Matiz para L de 1 ate 6 faca para C de 1 ate 6 faca escreva("Digite o valor do elemento da linha ",L,", coluna ",C,": ") leia(mat[L,C]) fimpara //Pula uma linha em branco escreval("") fimpara //Percorre a matriz para realizar a operacao para L de 1 ate 6 faca para C de 1 ate 6 faca se (mat[L,C] < 0) entao mat[L,C] <- 0 fimse fimpara fimpara //Imprime a matriz formada apos as mudancas para L de 1 ate 6 faca
para C de 1 ate 6 faca escreval("Valor da linha ",L,", Coluna ",C,": ",mat[L,C]) fimpara fimpara fimalgoritmo 2) Escreva um algoritmo que leia uma matriz de 50 linhas e 50 colunas de números inteiros. Calcule e imprima no final do algoritmo a soma dos elementos da diagonal principal da matriz.
algoritmo "Exer1"
var L,C,Soma,Par:inteiro
Mat:vetor[1..1500,1..1500] de inteiro
inicio
para L de 1 ate 1500 faca
para C de 1 ate 1500 faca
escreva("Digite um numero Linha",L," Coluna",C,": ")
leia(Mat[L,C])
fimpara
fimpara
Soma<-
Par<-
para L de 1 ate 1500 faca
para C de 1 ate 1500 faca
se (L = C) entao
Soma <- Soma + Mat[L,C]
se (Mat[L,C] % 2 = 0) entao
Par <- Par + 1
fimse
fimse
fimpara
fimpara
