Algoritmos

Proceso SinTitulo
clave<-" " c<-1 Mientras clave<>"44523n" & c<=3 Hacer c<-c+1 escribir "teclea la clave" leer clave Si clave="44523n" Entonces escribir "Bienvenido al sistema" Sino escribir "pruebe otra vez; clave incorrecta" FinSi FinMientras Si clave<>"44523n" Entonces
escribir "lo siento, no puedes entrar"
FinSi
FinProceso