atividade42681 08 ok

Prévia do material em texto

algoritmoS I
atividades DA aula 08
Para a construção dos algoritmos sugiro a utilização do programa Visualg. Todos os algoritmos desta atividade deverão ser enviados em um arquivo com um dos seguintes formatos: .doc, .docx ou .pdf.
Faça um algoritmo para ler uma matriz 5x5 de números inteiros e ler um número inteiro x. A seguir, o algoritmo deve multiplicar todos os elementos da matriz por x e exibir a matriz modificada. Exemplo para matriz de ordem 4 (apenas um exemplo!!!):
Algoritmo "Matriz Modificada"
var
vetA:vetor[1..5,1..5] de real
vetB:vetor[1..5,1..5] de real
i,j,x:inteiro
a : caractere
inicio
// Seção de Comandos
 para i de 1 ate 5 faca
 para j de 1 ate 5 faca
 escreva("Digite o numero [",i:1,",",j:1,"]: ")
 leia(vetA[i,j])
 fimpara
 fimpara
 escreval
 escreval("Digite Um Número Para Multiplicar")
 leia(x)
 escreval
 para i de 1 ate 5 faca
 vetA[i,2] := vetA[i,2]*x
 fimpara
 para i de 1 ate 5 faca
 para j de 1 ate 5 faca
 a := numpcarac(vetA[i,j])
 se (vetA[i,j] >-1 ) e (vetA[i,j] < 10) ENTÃO
 a := " "+a
 senao
 se (vetA[i,j] >= 10) e (vetA[i,j] < 100) ENTÃO
 a := " "+a
 senao
 se (vetA[i,j] >= 100) e (vetA[i,j] < 1000) ENTÃO
 a := " "+a
 senao
 a := " "+a
 fimse
 fimse
 fimse
 se j < 5 ENTÃO
 a := a+" - "
 fimse
 escreva( a )
 fimpara
 escreval("")
 fimpara
 fimalgoritmo
Faça um algoritmo para ler uma matriz 5x5 de números inteiros. A seguir, o algoritmo deve calcular e mostrar a soma dos elementos da diagonal principal. Exemplo para uma matriz de ordem 4 (apenas uma exemplo!!!).
Algoritmo " SOMA DIAGONAL Matriz"
VAR
VALORES : VETOR [1..5,1..5] DE REAL
somaDiagPrinc: REAL
i, j: INTEIRO
 inicio
 somaDiagPrinc <- 0
 Para i de 1 ate 5 faca
 Para j de 1 ate 5 faca
 Escreva("Digite um valor para a matriz")
 Leia (VALORES[i,j])
 se i=j entao
 somaDiagPrinc <- VALORES[i,j]+ somaDiagPrinc
 fimse
 fimpara
 fimpara
 Para i de 1 ate 5 faca
 para j de 1 ate 5 faca
 escreval (VALORES[i,j])
 fimpara
 fimpara
 escreval ("Soma dos elementos da diagonal principal é ",somaDiagPrinc)
 fimalgoritmo