Reloj digital

En este algoritmo veremos como hacer un reloj digital con PSeInt

Proceso Relog24Horas
 // 23:59:59
 // 0:7:5 00:07:05
 Definir Horas, Minutos, SegundosR como entero;
 Definir HorasC, MinutosC, SegundosC como caracter;
 Para Horas<-0 hasta 23 hacer
  Para Minutos <-0 hasta 59 hacer
   Para SegundosR <-0 hasta 59 hacer
    Borrar pantalla;
    Si Horas > 9 Entonces
     HorasC<-"";
    sino
     HorasC<-"0";
    FinSi
    Si Minutos > 9 Entonces
     MinutosC<-"";
    Sino
     MinutosC<-"0";
    FinSi
    Si SegundosR > 9 Entonces
     SegundosC <- "";
    Sino
     segundosC<-"0";
    FinSi
    Escribir HorasC, Horas,":",MinutosC, Minutos, ":",SegundosC, SegundosR;
    Esperar 15 Milisegundo;
   FinPara
  FinPara
 FinPara
FinProceso