PORTUGOL ALTENTICAÇÃO BANCO COM 3 TENTATIVAS

DESAFIO: 

Desenvolva um algoritmos em linguagem de programação Portugol, implementado com a ferramente Portugol Studio 2.7.5, que solicite ao usuário o seu Login e Senha. A autenticação terá 3 tentativas.

Caso a autenticação da Senha seja VERDADEIRA, apresente a mensagem "AUTENTICADO COM SUCESSO" e Mostra um MENU do Banco e Fim.

Caso contrario, a autenticação da Senha seja FALSA, apresente a mensagem "CONTA BLOQUEADA" e Fim.

Algoritmos em Portugol - Autenticação de Banco

YOUTUBE:

https://youtu.be/vHkCbWE4edE

CÓDIGO FONTE EM PORTUGOL

#----------------

programa

{

funcao inicio()

{

cadeia senhaCad = "Mauro12@", senhaDig, login

inteiro tentativa=0

real saldo = 1856.32

logico autenticacao = falso

escreva("\n=== Banco UniFatecie ===")

escreva("\nDigite seu Login...: ")

leia(login)

escreva("\nSeja Bem Vindo ",login,"!")

para(inteiro i=1; i<=3; i++){

tentativa++  // CONTADOR DE TENTATIVAS

se(tentativa==3){

escreva("\n\n*** ATENÇÃO ESTÁ É A SUA ULTIMA TENTATIVA ***")

}

escreva("\n\nDigite sua Senha...: ")

leia(senhaDig)

se(senhaCad == senhaDig){

escreva("\nAutenticação efetuada com sucesso!")

escreva("\nCaro ",login," seu saldo atual é de R$ ", saldo)

autenticacao = verdadeiro  // MUDA STATUS DA AUTENTICACAO

pare  // INTERROMPE O CICLO DO 'pare'

} senao {

escreva("\nSenha Invalida.")

escreva("\nTentativa...: ", tentativa)

}

}

se(autenticacao == verdadeiro){

escreva("\n\n=== MENU ===")

escreva("\n1-Saldo na Tela")

escreva("\n2-Deposito")

escreva("\n3-Tranferencia")

escreva("\n4-Poupança")

escreva("\n5-Pagamento")

} senao {

escreva("\n\nCaro ",login,", por medidas de segurança sua conta foi BLOQUEADA.")

escreva("\nDetectamos 3 tentativas de autenticação inválidas.")

escreva("\nProcure o seu Gerente e troque a senha imediatamente.")

escreva("\n\nBanco Unifatecie Virtual - 0800-123456")

}

}

}

#----------------