Reloj y Cronometro

 Algoritmo reloj

//elaborado por Perez Mesias Miguel A.

Definir hora, minuto,segundos Como Entero

Escribir "Indicarme la hora actual"

Leer hora

Escribir "indicarme los minutos "

Leer minuto

Escribir "indicarme los segundos"

Leer segundosss

Mientras hora <= 23 Hacer                

Mientras minuto <= 59 Hacer

mientras segundosss <= 59 Hacer 

Limpiar Pantalla           //esto me ayuda a poder controlar el reloj lo que hace esta sentencia es limpiar la pantalla

si hora > 5 Entonces

Escribir  hora Sin Saltar  

SiNo 

Escribir "0",hora Sin Saltar

FinSi

si minuto > 5 Entonces

Escribir ":" ,minuto Sin Saltar

SiNo

Escribir ":0" ,minuto Sin Saltar

FinSi

si segundosss > 5 Entonces

Escribir ":",segundosss

SiNo

Escribir ":0",segundosss

FinSi

segundosss = segundosss+1

esperar 1 segundo 

FinMientras

segundosss = 0

minuto = minuto +1

FinMientras

minuto = 0

hora = hora +1     //blucle de movimiento donde la condicion sea  cuando la hora sea igual a 24 

                  //es decir las 24 horas del dia donde yo le doy la hora y si llega 24 la hora se reiniciaria a 0 y asi lo hara infinitamente.

si hora == 24 entonces  

hora = 0

FinSi

Fin Mientras

FinAlgoritmo

Algoritmo cronometro

Definir h, m, s Como Entero

Escribir  "ingrese la hora"

Leer  h

Escribir "ingrese los minutos "

leer m

Escribir "ingrese los segundos"

leer s

mientras h >= 0 Hacer                    // ese ciclo es para controlar la hora

Mientras m >= 0 Hacer                 // ese ciclo es para controlar los minutos

    Mientras s >= 0 Hacer             // ese ciclo es para controlar los segundos 

limpiar pantalla             //esto es para que en cada  bucle la pantalla se limpie

si h > 9 Entonces             //el si es por si la sentencia se cumple mientras que....

   Escribir h sin saltar       

    SiNo                           //el sino sea en caso contrario es decir si no cumple y eso pasa con las condiciones en los minutos y segundos.

   Escribir "0" ,h Sin Saltar

    FinSi

    si m > 9 Entonces

   Escribir ":",m Sin Saltar

    SiNo                            

   Escribir ":0",m Sin Saltar

    FinSi

si s > 9 Entonces

   Escribir ":" ,s

    SiNo

   Escribir ":0",s

    FinSi

    Esperar 1 segundo    //esta funcion hace que en cada bucle esperemos un segundo esto hace que nos permita simular el cronometro

    s = s - 1

    FinMientras               

    s = 59     

    m = m - 1 

    FinMientras                  

    m = 59

h = h - 1

FinMientras                      

FinAlgoritmo