Visualg: Algoritmo com Registro e pesquisa
Preciso escrever um algoritmo no VisuAlg com um menu com 3 opções: Cadastrar, Pesquisar e Sair. Para cadastrar, devo fazer uma "ficha de cadastro" utilizando a função REGISTRO. Criei um algoritmo, mas o VisuAlg lê somente um bloco dos Escolha/Caso que fiz, ou seja, quando tento voltar no menu para selecionar outra opção o VisuAlg encerra meu algoritmo. Ajuda aew na moral, pelo amor de Deus!!!!
Algoritmo "semnome"
// Disciplina :
// Professor :
// Descrição :
// Autor(a) :
// Data atual :
Procedimento menu
Inicio
Escreval ("Software RH Master - Soluções em Cadastro")
Escreval ("*****************************************")
Escreval ("Selecione uma das opções: ")
escreval ("1- Cadastrar")
escreval ("2- Pesquisar")
escreval ("3- Sair")
leia (opcao)
Fimprocedimento
tipo
cadastro = registro
nome: caracter
telefone: caracter
email: caracter
fimregistro
Var
opcao: inteiro // variável para menu de opções
// variáveis para cadastrar
funcionario: vetor [1..3] de cadastro
c: inteiro
respCadastro: caracter
// variáveis para organizar
aux: caracter
o: inteiro
// variáveis para pesquisar
pesquisa: caracter
Inicio
menu
escolha opcao
Caso 1
Para c de 1 ate 3 faca
Escreva ("Nome completo: ")
Leia (funcionario.nome[c])
Escreva ("Telefone: ")
Leia (funcionario.telefone[c])
Escreva ("Email: ")
Leia (funcionario.email[c])
escreval ("------------------------------")
Fimpara
//Ordenação de nomes da agenda
Para o de 1 ate 3 passo 1 faca
para c de 1 ate 2 passo 1 faca
Se funcionario.nome[c] > funcionario.nome[c+1] entao
aux <- funcionario.nome[c]
funcionario.nome[c] <- funcionario.nome[c+1]
funcionario.nome <- aux
fimse
fimpara
fimpara
menu
Caso 2
Escreva ("Digite o nome que deseja pesquisar: ")
Leia (pesquisa)
Se (pesquisa = funcionario.nome[c]) entao
Escreval (funcionario.nome[c])
Escreval (funcionario.telefone[c])
Escreval (funcionario.email[c])
Senao
Escreva ("Nome não cadastrado!")
Fimse
menu
Caso 3
Fimescolha
Fimalgoritmo
Discussão (0)
Carregando comentários...