bueno el problema q etngo es con imprimir los dias en el aclendario, ya tengo el pirmer dia del a;o q el lo q mas necesito porq al entrar al programa pido el a;o y tinee q mostrar todos los meses pero seria d esta forma
1enero 7julio
2febreo 8agosto
3marzo 9sept
4abril 10oc
5mayo 11nov
6junio 12dic
primero se mostrarian los primeros 4 meses
1enero 7julio
2febreo 8agosto
de ahi apretar la tcla para abajo y se mostrarian los otros cuatro y asi.
el problema q tengo es como poner el array para q se display todos los meses con sus dias, y el otro problemira es q en el a;o 1752 SETP solo tiene 19 dias
http://www.timeanddate.com/calendar/index.html?year=1752&country=1ese
es el link para q compruebe, mi calendario esta entre el rango d 1400 y 2600 y ya encuentro el primer dia d ese a;o y q dia cae. aparti d ese dia empezaria a imprimir el calendario los dias.
para eso use la congruencia de zeller
en dond si da
0 = sabado
1 = domingo
2 = lunes
3 = martes
4 = miercoles
5 = jueves
6 = viernes
como le haria con los for para imprimir los dias y me quedara mas o menos asi
january july
mon tue wed thu fri sat sun mon tue wed thu fri sat sun
1 2 3 4 5 6 7 1 2 3 4 5 6 7
y asi sucesibamente aki les dejo el codigo q llevo hasta el momento para q lo miren.
por cierto mi profesor me dijo q uasra la STR para imprimir en pantalla pero no se como seria. en fox eso es para pasar d numero a text. supongo q se refiere a los mismo.
codigohay una parte q dice
{ GET THE FIRST DAY OF THE YEAR
IF (year < 2000) THEN
FOR Firstday := (2000 - 1) DOWNTO year DO
ELSE
FOR Firstday := 2000 TO (year - 1) DO
BEGIN
END;
END OF THE FIRST DAY OF THE YEAR }
HAY Q IGNORARLA esa es otra opcion para obtener el primer dia del a;o q es mas facil q la q yo use.