Algoritmo I - Portfólio 7

Prévia do material em texto

ALGORITMOS I 
 
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. 
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 
escreval ("Vetor A:") 
para i de 1 ate 10 faca 
 escreva (" ", vetorA[i]) 
fimpara 
escreval (" ") 
 
//valores na ordem inversa do Vetor A 
Escreval ("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. 
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 
escreval (" ") 
escreval ("Vetor e:") 
para i de 1 ate 10 faca 
 escreva (" ", vetorA[i]) 
fimpara 
escreval (" ") 
 
//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 usuario 
se (contador = 0) entao 
 escreva ("O valor digitado nao encontra se no vetor.") 
senao 
 escreva ("O valor", x," aparece", contador,"x no vetor.") 
fimse 
escreval (" ") 
 
fimalgoritmo