Ir ao conteúdo

nexus.tecinfo

Membro Pleno
  • Posts

    100
  • Cadastrado em

  • Última visita

Tudo que nexus.tecinfo postou

  1. Olá Kreitos. Conseguir fazer com o "se", não conseguir fazer com o "Escolha". erá erro de formatação, como você tinha falado anteriormente a respeito do fimse, sair colocando em cada mudança do 'SE'. Obrigado pela ajuda. irei postar aq o que fiz. Abraços. algoritmo "Cadastro" // Função : // Autor : // Data : 14/09/2010 // Seção de Declarações var opcao,tipo:inteiro nome, endereco:caracter cpf,telefone,data_nascimento:caracter inicio // Seção de Comandos escreval("*****Cadastro de cliente*****") escreval("1-incluir") escreval("2-Alterar") escreval("3-consultar") escreval("4-Excluir") escreval("5-Sair") leia(opcao) se opcao=1 então escreva("Nome:") leia(nome) escreva("Endereço:") leia(endereco) escreva("CPF:") leia(cpf) escreva("Telefone:") leia(telefone) escreva("Data Nascimento:") leia(data_nascimento) senao se opcao=2 então escreval("*****Alterar dados*****") escreval("Alterar Nome - 1") escreval("Alterar Endereço - 2") escreval("Aleterar CPF - 3") escreval("Alterar Telefone - 4") escreval("Alterar Data de Nascimento - 5") leia(tipo) se tipo=1 então escreva("Altere o Nome:") senao se tipo=2 então escreva("Altere o Endereço:") senao se tipo=3 então escreva("Altere o CPF:") senao se tipo=4 então escreva("Altere o Telefone:") senao se tipo=5 então escreva("Altere a Data de Nascimento:") fimse fimse fimse fimse fimse senao se opcao =3 então escreval("*****Consultar dados*****") escreval("Consultar Nome - 1") escreval("Consultar Endereço - 2") escreval("Consultar CPF - 3") escreval("Consultar Telefone - 4") escreval("Consultar Data de Nascimento - 5") leia(tipo) se tipo=1 então escreva("Consulte o Nome:") senao se tipo=2 então escreva("Consulte o Endereço:") senao se tipo=3 então escreva("Consulte o CPF:") senao se tipo=4 então escreva("Consulte o Telefone:") senao se tipo=5 então escreva("Consulte a Data de Nascimento:") fimse fimse fimse fimse fimse senao se opcao=4 então escreval("*****Excluir dados:*****") escreval("Excluir Nome - 1") escreval("Excluir Endereço - 2") escreval("Excluir CPF - 3") escreval("Excluir Telefone - 4") escreval("Excluir Data de Nascimento - 5") leia(tipo) se tipo=1 então escreva("Exclua o Nome:") senao se tipo=2 então escreva("Exclua o Endereço:") senao se tipo=3 então escreva("Exclua o CPF:") senao se tipo=4 então escreva("Exclua o Telefone:") senao se tipo=5 então escreva("Exclua a Data de Nascimento:") fimse fimse fimse fimse fimse senao escreva("Programa encerrado!") fimse fimse fimse fimse fimalgoritmo
  2. Kreitos, estive tentando fazer também com o 'escolha e caso' e quando vai complilar da um erro pedindo fimalgoritmo, só que na estrutura já tem o fimalgoritmo, não sei onde esta o erro, nem de uma forma e nem de outra, rsrs, agradeço desde já a ajuda, vamos ficar tentando descobri o erro, a respeito da parte do 'fimse' não necessariamente tem que ser logo após o termino, como eu fiz esta certo também, colocando o fimse no final de tudo. Abraços!!!
  3. Bom dia, Estou tentando fazer um algoritmo para cadastro, não sei onde esta o erro, já que quando eu coloco a opção 1 e 2 da tudo certo, quando vou pra opção 3 e 4 não aparece os tipos para que possa fazer as CONSULTAS e EXCLUSÕES, alguem poderia desvendar este misterio? segue o formato que estou montando para poder alguem descobrir. algoritmo "Cadastro" // Função : // Autor : // Data : 14/09/2010 // Seção de Declarações var opcao,tipo:inteiro nome, endereco:caracter cpf,telefone,data_nascimento:real inicio // Seção de Comandos escreval("Cadastro de cliente") escreval("1-incluir") escreval("2-Alterar") escreval("3-consultar") escreval("4-Excluir") escreval("5-Sair") leia(opcao) se opcao=1 então escreva("Nome:") leia(nome) escreva("Endereço:") leia(endereco) escreva("CPF:") leia(cpf) escreva("Telefone:") leia(telefone) escreva("Data Nascimento:") leia(data_nascimento) senao se opcao =2 então escreval("Alterar dados") escreval("Alterar Nome - 1") escreval("Alterar Endereço - 2") escreval("Aleterar CPF - 3") escreval("Alterar Telefone - 4") escreval("Alterar Data de Nascimento - 5") leia(tipo) se tipo=1 então escreva("Altere o Nome:") senao se tipo=2 então escreva("Altere o Endereço:") senao se tipo=3 então escreva("Altere o CPF:") senao se tipo=4 então escreva("Altere o Telefone:") senao se tipo=5 então escreva("Altere a Data de Nascimento:") senao se opcao =3 então escreval("Consultar dados") escreval("Consultar Nome - 1") escreval("Consultar Endereço - 2") escreval("Consultar CPF - 3") escreval("Consultar Telefone - 4") escreval("Consultar Data de Nascimento - 5") leia(tipo) se tipo=1 então escreva("Consulte o Nome:") senao se tipo=2 então escreva("Consulte o Endereço:") senao se tipo=3 então escreva("Consulte o CPF:") senao se tipo=4 então escreva("Consulte o Telefone:") senao se tipo=5 então escreva("Consulte a Data de Nascimento:") senao se opcao=4 então escreval("Excluir dados:") escreval("Excluir Nome - 1") escreval("Excluir Endereço - 2") escreval("Excluir CPF - 3") escreval("Excluir Telefone - 4") escreval("Excluir Data de Nascimento - 5") leia(tipo) se tipo=1 então escreva("Exclua o Nome:") senao se tipo=2 então escreva("Exclua o Endereço:") senao se tipo=3 então escreva("Exclua o CPF:") senao se tipo=4 então escreva("Exclua o Telefone:") senao se tipo=5 então escreva("Exclua a Data de Nascimento:") fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimse fimalgoritmo

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...