jueves, 14 de mayo de 2009

Publicado por sergio aparicio

entero clave
cadena [30]nombre
inicio
clave<-199230
escriba " senor usuario(a) se le informa q son tres intentos de ingreso al sistema"
llamar nueva_linea
escriba "por favor ingrese su nombre "
lea nombre
escriba "ingrese clave"
lea clave
si clave=199230 entonces
llamar nueva_linea
escriba "ingreso exitoso al sistema"
sino
escriba "intente de nuevo"
llamar nueva_linea
escriba "ingresar clave"
lea clave
si clave=199230 entonces
llamar nueva_linea
escriba "ingreso exitoso al sistema"
sino
escriba "ultimo intento "
llamar nueva_linea
escriba "ingresar clave"
lea clave
si clave=199230 entonces
llamar nueva_linea
escriba "ingreso exitoso al sistema"
sino
si clave<>199230 entonces
llamar nueva_linea
escriba " aceso denegado al sistema "
fin si
fin si
fin si
fin si
fin

0 comentarios:

Publicar un comentario