Creando un Reloj con PseInt

Código

---

El reloj que se ha realizado en PseInt primero pide la hora, minutos y segundos con los que va a iniciar, mediante el uso de estructuras repetitivas valida datos correctos y posteriormente muestra la hora ingresada y avanza tal cual lo hace un reloj de segundo en segundo mediante la función ESPERAR

Proceso reloj
   Definir hora, minuto, segs Como Entero
   Repetir
     Escribir "Ingrese la hora"
     Leer hora 
   Hasta Que hora>=0 Y hora <24
   Repetir
     Escribir "Ingrese los minutos"
     Leer minuto  
   Hasta Que hora>=0 Y hora <60
   Repetir
     Escribir "Ingrese los segundos"
     Leer segs  
   Hasta Que hora>=0 Y hora <60
   Escribir "Presiona una tecla para comenzar"
   Esperar Tecla
   Mientras Verdadero Hacer
     Limpiar Pantalla
     Si hora<10 Entonces
       Escribir "0" hora Sin Saltar
     Sino
       Escribir hora Sin Saltar
     FinSi
     Escribir " : " Sin Saltar
     Si minuto<10 Entonces
       Escribir "0" minuto Sin Saltar
     Sino
       Escribir minuto Sin Saltar
     FinSi  
     Escribir " : " Sin Saltar
     Si segs<10 Entonces
       Escribir "0" segs
     Sino
       Escribir segs
     FinSi
     segs<-segs+1  
     Si segs=60 Entonces
       minuto<-minuto+1
       segs<-0
       Si minuto=60 Entonces
         hora<- hora+1
         minuto<-0
         Si  hora=24 Entonces
           hora<-0
         FinSi
       FinSi
     FinSi 
     Esperar 1 Segundo  
   FinMientras
FinProceso