Atividade 08 - Algoritmo - Jackliny

Prévia do material em texto

algoritmoS
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.
1. 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 "atividade0801"
var
m: vetor[1..5, 1..5] de inteiro
X: inteiro
l, c: inteiro
inicio
 Escreva ("Defina X: ")
 Leia (X)
 Escreval ("--------------------------------")
 Escreval ("INFORME DADOS DA MATRIZ ORIGINAL")
 Escreval ("--------------------------------")
 Para l <- 1 ate 5 faca
 Para c <- 1 ate 5 faca
 Escreva ("Digite um número para a posição [", l, ",", c, "]: ")
 Leia (m[l,c])
 FimPara
 FimPara
 Escreval ()
 Escreval ("---------------")
 Escreval ("MATRIZ ORIGINAL")
 Escreval ("---------------")
 Escreval ()
 Para l <- 1 ate 5 faca
 Para c <- 1 ate 5 faca
 Escreva (m[l,c]:4)
 FimPara
 Escreval ()
 FimPara
 Escreval ()
 Escreval ("---------------------------")
 Escreval ("MATRIZ MODIFICADA POR X (", X, ")")
 Escreval ("---------------------------")
 Escreval ()
 Para l <- 1 ate 5 faca
 Para c <- 1 ate 5 faca
 Escreva (m[l,c]*X:4)
 FimPara
 Escreval ()
 FimPara
fimalgoritmo
2. 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 "atividade0802"
var
m: vetor[1..5, 1..5] de inteiro
Soma, l, c: inteiro
inicio
 Soma <- 0
 Escreval ("--------------------------------")
 Escreval ("INFORME DADOS DA MATRIZ ORIGINAL")
 Escreval ("--------------------------------")
 Para l <- 1 ate 5 faca
 Para c <- 1 ate 5 faca
 Escreva ("Digite um número para a posição [", l, ",", c, "]: ")
 Leia (m[l,c])
 Se (l=c) entao
 Soma <- Soma + (m[l,c])
 FimSe
 FimPara
 FimPara
 Escreval ()
 Escreval ("---------------")
 Escreval ("MATRIZ ORIGINAL")
 Escreval ("---------------")
 Escreval ()
 Para l <- 1 ate 5 faca
 Para c <- 1 ate 5 faca
 Escreva (m[l,c]:4)
 FimPara
 Escreval ()
 FimPara
 Escreval ()
 Escreval ("--------------------------")
 Escreval ("SOMA DA DIAGONAL PRINCIPAL")
 Escreval ("--------------------------")
 Escreval ()
 Escreval ("A soma da diagnonal principal da matriz é: ", Soma)
 Escreval ()
fimalgoritmo
A =
 2 3 5 1
 3 4 0 7
 9 1 5 8
 4 0 9 1 
x = 2
 4 6 10 2
 6 8 0 14
 18 2 10 16
 8 0 18 2 
A * x =
Soma da diagonal principal = 12
A =
 2 3 5 1
 3 4 0 7
 9 1 5 8
 4 0 9 1