Pregunta: | 57082 - AÑOS BISIESTOS EN PASCAL |
Autor: | Genesis Gamboa Delgado |
bueno mi pregunta es como calcular exactamente el número de días vividos por una persona hasta la fecha. contemplando los años bisiestos. ¿como hacer con los años bisiestos en pascal? |
Respuesta: | Luis Felipe García Gutiérrez |
Definición: http://es.wikipedia.org/wiki/Bisiesto
Se efectúa un procedimiento para validar si determinado es biciesto, para ello y según la definición ésto ocurre cada 4 años y siempre y cuando no sea divisible exactamente por 100. Para ello de la fecha ingresada por el usuario como la de su nacimiento se separa de ella el año de nacimiento, y se inicicia un ciclo que va desde el año de nacimiento hasta el actual-1, se verifica si el año es biciesto y la primera vez que se ejecuta se calculan los días faltantes de ese año y se acumulan en una variable previamente inicializada en 0; para los demás casos se verifican si es bisieto o no y se suman la cantidad de días contenidos; para el año actual se verifica que la fecha actual no sea mayor a 28 de febrero, hace la misma validación de año bisiesto y se suman la cantidad de días transcurridos... y eureka!!! suerte y pulso!!! |