Ir para conteúdo
Fórum Script Brasil

wemy felype

Membros
  • Total de itens

    1
  • Registro em

  • Última visita

Sobre wemy felype

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

wemy felype's Achievements

0

Reputação

  1. ola pessoal meu professor me passou um trabalho de visualg que é fazer um algoritimo com *lista de pessoas cadastradas *cadastro de pessoas *editar cadastros *excluir cadastros e *sair alguns já consegui e outros estou quebrando a cabeça. algoritmo "sistema de login" var login,senha,numenu,nome,nomeusu,senhausu,posição: caracter logado : logico list,i:inteiro cadastro:vetor[1..5,1..3] de caractere inicio //aqui é onde vai se feito o login logado<- falso repita escreval(" Area de Usuario") escreva("login: ") leia(login) escreva ("senha: ") leia(senha) se( login = "admin" ) e ( senha = "123" ) então logado <- verdadeiro escreval(" usuario logado") senao logado <- falso limpatela escreval(" usuario ou senha errado") fimse ate logado = verdadeiro cadastro[1,1]<-"wemy" cadastro[1,2]<-"admin" cadastro[1,3]<-"123456" cadastro[2,1]<-"joao" cadastro[2,2]<-"jj" cadastro[2,3]<-"123" cadastro[3,1]<-"carlos" cadastro[3,2]<-"car" cadastro[3,3]<-"1234" //menu de opçoes se logado = verdadeiro então repita escreval("Àrea do cliente ",login,".") escreval("*************************************************************") escreval("* Escolha uma opção *") escreval("* 1 - Listar Clientes. *") escreval("* 2 - Cadastrar clientes. *") escreval("* 3 - excluir cliente. *") escreval("* 4 - Editar cliente. *") escreval("* 5 - Sair. *") escreval("*************************************************************") escreva("opção: ") leia(numenu) escolha(numenu) caso "1" //Lista de Clientes para i de 1 ate 5 faca para list de 1 ate 3 faca escreva("|",cadastro[i,list],"|") fimpara escreval escreval("---------------") fimpara escreval() caso "2" //Cadaatro de clientes escreval("cadastro de clientes") escreva("digite seu nome: ") leia(nome) escreva("digite o nome de usuario: ") leia(nomeusu) escreva("digite sua senha: ") leia(senhausu) escreval("cadastro Feito com sucesso") escreval("")//fim cadastro de cliente para i de 1 ate 5 faca se (cadastro[i,1] = "") e (cadastro[i,2] = "") e (cadastro[i,3] = "") então cadastro[i,1] <- nome cadastro[i,2] <- nomeusu cadastro[i,3] <- senhausu interrompa fimse fimpara caso "3" //excluir Clientes escreva("Qual a posição do cliente") leia(posição) caso "4" //Edital clientes caso "5" //Sair logado<-falso fimescolha ate logado = falso fimrepita fimse fimalgoritmo
×
×
  • Criar Novo...