==============================================================
Faça um algoritmo para ler um número que é um
código de usuário. Caso este código seja
diferente de um código armazenado internamente no
algoritmo (igual a 1234) deve ser apresentada a mensagem ‘Usuário inválido!’. Caso o Código seja
correto, deve ser lido outro valor que é a senha. Se esta senha estiver incorreta (a certa é 9999) deve ser
mostrada a mensagem ‘senha incorreta’. Caso a senha esteja correta, deve ser mostrada a mensagem
‘Acesso permitido’.
==============================================================
// Seção de Declarações
var
usuario,senha:inteiro
inicio
// Seção de Comandos
escreval("Entre com o CODIGO DE USUARIO :")
leia(usuario)
se(usuario = 1234)entao
escreval("CODIGO CORRETO")
escreval("Entre com a SENHA :")
leia(senha)
se
(senha = 9999) entao
escreval("ACESSO PERMITIDO")
senao
escreval("SENHA INCORRETA")
fimse
senao
escreval("USUARIO INVALIDO")
fimse
fimalgoritmo
==============================================================
Ótimo código, amigo.
ResponderExcluirFiz de outra forma:
var
codigo, codigodigitado, senha, senhadigitada : inteiro
inicio
codigo := 1234
senha := 9999
escreval ("Digite o código do usuário: ")
leia (codigodigitado)
se (codigodigitado=codigo) entao
escreval ("Digite sua senha: ")
leia (senhadigitada)
senao
escreval ("Usuário Inválido!")
fimse
se (codigodigitado=codigo) e (senhadigitada=senha) entao
escreval ("Acesso Permitido")
senao
se (codigodigitado=codigo) e (senhadigitada<>senha) entao
escreval ("Senha Incorreta")
fimse
fimse