Calendario

Para poder realizar un calendario se necesita de tres variables, D=día - M=mes -A=año, los cuales los valores que serán evaluados en el algoritmo; para saber en que que mes está correctamente se necesita el uso de condicionales que nos limite hasta la fecha limite que tiene un mes febrero = desde el día 1 al 28 normalmente y si es año Bisiesto tendrá 29 días. En caso contrario de que se cumplan los condicionales que diga que la fecha es incorrecta. 

Ejercicio:

• Realizar un algoritmo que sea capaz de realizar fechas de cualquier año futuro o pasado, y que puede decir cual fue la fecha que se dígito, en que mes se esta cumpliendo la fecha, si esta fecha es correcta, si el mes digitado existe y por ultimo decir si el año en que esta la fecha es Bisiesto o no.

Proceso

  Escribir "El calendario esta dividido en Dia=D, Mes=M y Año=A";

Escribir "Digite la fecha del dia=D";

Leer D;

Escribir "Digite la fecha del mes=M";

Leer M;

Escribir "Digite la fecha del ano=A";

Leer A;

Escribir "Su fecha resultante es: ",D,"/",M,"/",A;

Escribir "";

Si D<=31 y D>0 Entonces

Si M=01 Entonces

Escribir "Estamos en Enero";

FinSi

FinSi

Si D<=29  y D>0 Entonces

Si M=02 Entonces

Escribir "Estamos en Febrero";

FinSi

FinSi

Si D<=31  y D>0 Entonces

Si M=03 Entonces

Escribir "Estamos en Marzo";

FinSi

FinSi

Si D<=30  y D>0 Entonces

Si M=04 Entonces

Escribir "Estamos en Abril";

FinSi

FinSi

Si D<=31  y D>0 Entonces

Si M=05 Entonces

Escribir "Estamos en Mayo";

FinSi

FinSi

Si D<=30 y D>0 Entonces

Si M=06 Entonces

Escribir "Estamos en Junio";

FinSi

FinSi

Si D<=31  y D>0 Entonces

Si M=07 Entonces

Escribir "Estamos en Julio";

FinSi

FinSi

Si D<=31  y D>0 Entonces

Si M=08 Entonces

Escribir "Estamos en Agosto";

FinSi

FinSi

Si D<=30  y D>0 Entonces

Si M=09 Entonces

Escribir "Estamos en Septiembre";

FinSi

FinSi

Si D<=31  y D>0 Entonces

Si M=10 Entonces

Escribir "Estamos en Octubre";

FinSi

FinSi

Si D<=30  y D>0 Entonces

Si M=11 Entonces

Escribir "Estamos en Noviembre";

FinSi

FinSi

Si D<=31  y D>0 Entonces

Si M=12 Entonces

Escribir "Estamos en Diciembre";

FinSi

FinSi

Si A<=2012 y A>=0 Entonces

Escribir "La Fecha es Correcta";

Sino

Escribir "No es Valida la fecha";

FinSi

Si M<=12 y M>=1 Entonces

Escribir "Mes existente";

Sino

Escribir "El Mes no Existe";

FinSi

Si A MOD 400=0 o A MOD 100<>0 Entonces

Si A MOD 4=0 Entonces

Escribir "Es ano Bisiesto";

Sino

Escribir "No es ano Bisiesto";

FinSi

Sino

Escribir "No es  ano Bisiesto";

FinSi

FinProceso

Calendario