atividade 7 doc

Prévia do material em texto

ALGORITMO E PROGRAMAÇÃO 
 
ATIVIDADES DA AULA 07 
 
 
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 um vetor de 10 números inteiros e depois exibi-lo em 
ordem inversa. 
RESPOSTA: 
Algoritmo "Vetor de 10 números inteiros e ordem 
inversa" 
// Autor : Gilberto Boddenberg 
// Data : 16/05/2021 
// Seção de Declarações 
var 
vetorA: vetor[1..10]de real 
i, contador: inteiro 
 
inicio 
contador <- 1 
 
//Construcao do vetor A 
para i de 1 ate 10 faca 
escreva ("Digite o", contador," o numero do Vetor A: ") 
leia (vetorA[i]) 
 
contador <- contador + 1 
fimpara 
 
//Exibicao do Vetor A 
escreva("Vetor A:") 
para i de 1 ate 10 faca 
escreva (" ", vetorA[i]) 
fimpara 
escreva (" ") 
 
//valores na ordem inversa do Vetor A 
escreva ("Os valores na ordem inversa do Vetor A: ") 
para i de 10 ate 1 passo - 1 faca 
escreva (" ", vetorA[i]) 
fimpara 
 
 fimalgoritmo 
 
 
2. Faça um algoritmo para ler um vetor de 10 números inteiros, como também, ler 
um número inteiro x. A seguir, o algoritmo deve calcular e mostrar quantas 
vezes o número x aparece no vetor. 
RESPOSTA: 
algoritmo "vetor de 10 números e mostrar quantas vezes 
aparece o número x " 
// Autor : Gilberto Boddenberg 
// Data : 16/05/2021 
// Seção de Declarações 
var 
vetorA: vetor[1..10] de inteiro 
i, x, contador: inteiro 
 
inicio 
contador <- 1 
 
//Construcao do vetor 
para i de 1 ate 10 faca 
escreva ("Digite o", contador," o valor do vetor:") 
leia (vetorA[i]) 
 
contador <- contador + 1 
fimpara 
 
//Valor de X a ser verificado no vetor 
escreva ("Digite o valor para ser identificado no 
vetor:") 
leia (x) 
 
//Exibicao do vetor 
escreva(" ") 
escreva ("Vetor é:") 
para i de 1 ate 10 faca 
escreva (" ", vetorA[i]) 
fimpara 
escreva(" ") 
 
//Verificacao se X encontra se no vetor 
contador <- 0 
para i de 1 ate 10 faca 
se(x= vetorA[i]) entao 
contador <- contador + 1 
fimse 
fimpara 
 
//Mensagem final para o usuário 
se (contador= 0)entao 
escreva ("O valor digitado nao encontra se no vetor.") 
senao 
escreva("O valor", x, " aparece", contador, "x no 
vetor.") 
fimse 
escreva(" ") 
fimalgoritmo