Atividade 7 - Algoritmos I

Prévia do material em texto

ALGORITMOS I 
 
ATIVIDADES DA AULA 07 
 
RHUAN PABLO DA SILVA 
ENGENHARIA DE SOFTWARE – 1 SEMESTRE 
 
 
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. 
Algoritmo "Aula 7 - Visualg - exercicio 1" 
// Disciplina : [Algoritimos I] 
// Professor : Me. Marcos Alves Mariano 
// Descrição : Numeros ordem inversa (função) 
// Autor(a) : Rhuan Pablo da Silva 
// Data atual : 12/10/2022 
 
Var 
// Seção de Declarações das variáveis 
v: vetor [1..10]de inteiro 
c:inteiro 
 
Inicio 
// Seção de Comandos, procedimento, funções, operadores, etc... 
para c <-1 ate 10 faca 
 escreva ("Digite o ", c," o. valor: ") 
 leia (v[c]) 
fimpara 
escreval("") 
escreva ("expondo a ordem inversa dos números acima citados") 
para c <-10 ate 1 passo -1 faca 
 escreva (V[c]) 
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. 
Algoritmo "Aula 6 - Visualg - exercicio 1" 
// Disciplina : [Algoritimos I] 
// Professor : Me. Marcos Alves Mariano 
// Descrição : vetor 10 numeros inteiros (função) 
// Autor(a) : Rhuan Pablo da Silva 
// Data atual : 12/10/2022 
 
Var 
// Seção de Declarações das variáveis 
NUMERO: VETOR [1..10] de inteiro 
i, num, cont: INTEIRO 
 
Inicio 
// Seção de Comandos, procedimento, funções, operadores, etc... 
cont <- 0 
 para i de 1 ate 10 faca 
 escreva("Digite um número: ") 
 leia (NUMERO[i]) 
 fimpara 
 para i de 1 ate 10 faca 
 escreva(NUMERO[i]) 
 fimpara 
escreval("") 
 escreval("Digite um determinado numero x a ser localizado: ") 
 leia (num) 
 para i de 1 ate 10 faca 
 se (NUMERO[i] = num) então 
 cont<-cont+1 
 fimse 
 fimpara 
escreval("") 
 se(cont>0) então 
 escreval("numero encontrado ",cont," veze(s)") 
 fimse 
Fimalgoritmo