Algoritmo CajeroAutomatico
// Definir saldo inicial
Definir saldo_colones Como Real
Definir saldo_dolares Como Real
saldo_colones <- 1000000
saldo_dolares <- 1000
// Definir variables
Definir opcion, cantidad Como Entero
// Definir contraseña
Definir CONTRASENA, pswd Como Cadena
Definir intentosFallidos Como Entero
Definir cuentaBloqueada, lock Como Logico
CONTRASENA <- ‘120315’
intentosFallidos <- 0
cuentaBloqueada <- Falso
// valida contraseña
Escribir ‘Bienvenido al cajero automático’
Escribir ”
// Ciclo para controlar los intentos
Mientras intentosFallidos < 3 Y NO lock Hacer
Escribir ‘Ingrese la contraseña:’
Leer pswd
// Verificar si la cuenta ya está bloqueada
Si cuentaBloqueada Entonces
Escribir ‘La cuenta está bloqueada. Contacta al administrador.’
Sino
// Verificar si la contraseña ingresada es correcta
Si pswd=CONTRASENA Entonces
Escribir ‘¡Contraseña correcta!’
Escribir ‘ ‘
Escribir ‘¿Qué transacción desea hacer? ‘
Escribir ”
Escribir ‘1. Retiro en colones’
Escribir ‘2. Retiro en dólares’
Escribir ‘3. Visualizar estado de cuenta’
Escribir ‘4. Salir’
Escribir ”
Escribir ‘¿Seleccione una opcion? ‘
Leer opcion
Repetir
// Realizar operaciones según la opción seleccionada
Segun opcion Hacer
1:
Escribir ‘Ingrese la cantidad que desea retirar en colones:’ // Retiro en colones
Leer cantidad
Si cantidad > saldo_colones Entonces
Escribir ‘Fondos insuficientes’
Sino
saldo_colones <- saldo_colones – cantidad
Escribir ‘Retiro exitoso. Nuevo saldo en colones:’, saldo_colones
FinSi
2:
Escribir ‘Ingrese la cantidad que desea retirar en dólares:’ // Retiro en dólares
Leer cantidad
Si cantidad > saldo_dolares Entonces
Escribir ‘Fondos insuficientes’
Sino
saldo_dolares <- saldo_dolares – cantidad
Escribir ‘Retiro exitoso. Nuevo saldo en dólares:’, saldo_dolares
FinSi
3:
Escribir ‘Saldo en colones:’, saldo_colones // Visualizar estado de cuenta
Escribir ‘Saldo en dólares:’, saldo_dolares
4:
Escribir ‘Gracias por usar el cajero automático’ // Salir
De Otro Modo:
Escribir ‘Opción inválida’
FinSegun
Hasta Que opcion=4
Sino
Escribir ‘Contraseña incorrecta. Intenta de nuevo.’
intentosFallidos <- intentosFallidos + 1
// Verificar si se han superado los 3 intentos fallidos
Si intentosFallidos=3 Entonces
Escribir ‘Has excedido el número de intentos permitidos. La cuenta ha sido bloqueada.’
lock <- Verdadero
FinSi
FinSi
FinSi
FinMientras
FinAlgoritmo

somebody can help me with this