MAPA Algoritimos e Lógica de Programação

Prévia do material em texto

1 – Estrutura de Registro para armazenar 100 aparelhos celulares
2 – Um menu que apresente os seguintes módulos (procedimentos / funções)
2.1 – Cadastrar Produtos
2.2 – Listar todos (Aqui liste 3 características armazenadas)
2.3 - Listar 1 produto específico (Aqui liste 3 características armazenadas)
 
Considere as seguintes regras: 
1 - Controlar o cadastro para que não haja códigos idênticos.
2 - Informar ao usuário se produto foi cadastro ou não.
3 - Informar ao usuário que o produto não foi encontrado caso ocorra.
Algoritmo Cadastro_Cel
Tipo
cel_caracteristica = registro
	codigo: inteiro
	marca: vetor[1..50] de caractere
	modelo: vetor[1..50] de caractere
	preco: real
fim_registro
Var
Menu: inteiro
celular: vetor[1..100] de cel_caracteristica
opt, qtdCel, i : inteiro
Procedimento mostrarMenu()
Início
Escreval(“1 - Cadastrar celular”)
Escreval(“2 - Consultar um celular pelo código”)
Escreval(“3 - Listar todos os celulares”)
Escreval(“4 – Sair do programa de cadastro”)
Fim_procedimento
Procedimento cadastrar_celular()
	Início
	Se (qtdCel < 100) entao 
Escreva(“Digite o código: “)
Leia(celular[qtdCel+1].codigo)
Escreva(“Digite a descrição: “)
Leia(celular[qtdCel+1].marca)
Escreva(“Digite a unidade: “)
Leia(celular[qtdCel+1].modelo)
Escreva(“Digite o preço: “)
Leia(celular[qtdCel+1].preco)
qtdCel <- qtdCel + 1
Escreva(“Celular cadastrado com sucesso!”)
Senao
Escreva(“Limite máximo atingido: 100 celulares!”)
Fim_se
opt <- 0
Fim_procedimento
Funcao consulta_individual (cod: inteiro) : inteiro
	Var
		i, achou: inteiro
	inicio
		i <- 1
		achou <- 0
		Enquanto (i <= qtdCel) faca
			Se (celular[i].codigo == cod) entao
				Escreva(“Produto: “, cod)
				Escreva(“Marca: “, celular[i].marca)
				Escreva(“Modelo: “celular[i].modelo)
				Escreva(“Preço: “celular[i].preco)
				Retorne i
			Fim_se
			i <- i + 1
		Fim_enquanto
		Escreva(“Celular não encontrado...”)
		Retorne -1
	Fim_funcao
Procedimento listarCelulares()
	Var
		i: inteiro
	Início
		Para i de 1 até qtdCel passo 1 faça
		Escreva(“Produto: “, celular[i].codigo)
		Escreva(“Marca: “, celular[i].marca)
		Escreva(“Modelo: “, celular[i].modelo)
		Escreva(“Preço: “, celular[i].preco)
	Fim_para
Fim_procedimento
Início
	qtdCel <- 0
	Repita
		mostrarMenu()
		Leia (opt)
		Caso (opt)
			Seja 1 faca
				Para i de 1 ate 100 passo 1 faca
cadastrar_celular()
				Fim_para
			Seja 2 faca 
			consulta_individual()
			Seja 3 faca
			listarCelulares()
		Fim_caso
	Ate_que (opt = 4)
Fim