Buscar

Algoritmos para manipulação de vetores

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Você também pode ser Premium ajudando estudantes

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Você também pode ser Premium ajudando estudantes

Prévia do material em texto

ALGORITMOS 
 
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. 
R.: 
algoritmo "Vetor de 10 números" 
 // Função: Algoritmo para ler um vetor de 10 números inteiros e 
exibi-los em ordem inversa. 
var 
 //Declaração de variáveis 
 I,X,J: inteiro 
 elementos:vetor[1..10] de inteiro 
inicio 
 para I de 1 ate 10 passo 1 faca 
 leia(elementos[I] 
 fimpara 
 para I de 1 ate 9 passo 1 faca 
 para J de I+1 ate 10 passo 1 faca 
 se (elementos[I]<elementos[J]) entao 
 X<-elementos[I] 
 elementos[I]<-elementos[J] 
 elementos[J]<-X 
 fimse 
 fimpara 
 fimpara 
 para I de 1 ate 10 passo 1 faca 
 escreval("vetor em ordem inverso:", elementos[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. 
 
R.: 
algoritmo "Ler vetor de 10 números" 
 // Função: Algoritmo para ler um vetor de 10 números inteiros, 
como também, ler um número inteiro x, e calcular e mostrar quantas 
vezes o número x aparece no vetor. 
var 
 //Declaração de variáveis 
 i: inteiro 
 yqx: inteiro 
 vetA:vetor[1..10] de inteiro 
inicio 
 yqx<-0 
 para i de 1 ate 10 faca 
 escreval("informe o numero:", i,"numero") 
 leia(vetA[i]) 
 se (vetA[i]=x) entao 
 yqx<-yqx+1 
 fimse 
 fimpara 
 escreva("foram digitados", yqx, "vezes: ") 
fimalgoritmo

Continue navegando