questoes da AV1

Prévia do material em texto

Questão 3:
algoritmo "matriz"
// Função :
// Autor :
// Data : 01/09/2009
// Seção de Declarações
var dp,i,j,nlin,ncol:inteiro
matriz: vetor [1..5,1..5] de inteiro
inicio
// Seção de Comandos
// Inicializa valor
dp<-0
escreval("digite o número de linhas da matriz")
leia(nlin)
escreval("digite o número de colunas da matriz")
leia(ncol)
escreval("Ler matriz")
para i de 1 ate nlin faca
para j de 1 ate ncol faca
leia(matriz[i,j])
fimpara
fimpara
escreval("Calcula soma dos elementos da diagonal principal")
para i de 1 ate nlin faca
para j de 1 ate ncol faca
 se i=j entao
 dp<-dp+matriz[i,j]
 fimse
fimpara
fimpara
escreval("Escrita sob forma de matriz")
para i de 1 ate nlin faca
para j de 1 ate ncol faca
 escreva (matriz[i,j]:3)
fimpara
escreval("")
fimpara
escreva("A soma dos elementos da diagonal principal é : ",dp)
fimalgoritmo
Questão 4:
algoritmo "passar"
// Função : Verifica se um aluno foi aprovado ou não
// Se não aprovado, calcula quanto precisa tirar na AV3
// Autor : Marcone
// Data : 27/04/2017
// Seção de Declarações 
var
AV1,AV2,nota,precisa:inteiro
media:real
inicio
// Seção de Comandos
// Entrada dos dados
escreva("Digite a nota da AV1 ")
leia(AV1)
escreva("Digite a nota da AV2 ")
leia(AV2)
// Processamento
media<-(av1+av2)/2
se ((media >= 6) e (AV1>=4) e (AV2>=4)) entao
 escreval("Parabéns!!")
 escreva("Você foi aprovado")
senao
 se media <=3 entao
 escreval("Reprovado")
 escreva("Você precisa se dedicar mais um pouco na disciplica de Lógica de Programação")
 senao
 se av1 > av2 entao
 nota<-av1
 senao
 nota<-av2
 fimse
 se ((nota=10) ou (nota=9) ou (nota=8)) entao
 precisa<-4
 senao
 precisa<-12-nota
 fimse
 // Uma das saídas
 escreval("Fazer AV3")
 escreva("Você precisa de tirar",precisa," na AV3 para ser aprovado")
 fimse
fimse
fimalgoritmo