Bueno haber si entiendo:
Necesitas hacer que un programa te muestre todos los dias del año 2004.
Primero que nada necesitas dividir los meses en los que tienen 30 y 31 dias(usa el calendario y fijate, sino cuelquier otro metodo que conozcas) y tambien definir los dias que tendría febrero, si es o no biciesto el año. De hecho 2004 si lo es:
aqui tienes varios algoritmos de año biciestoLuego reralizas un; para de mes=1 hasta mes=12 y dentor de este for realizas otro segun sea el mes. Si el mes = 1 => dias=30(supongo que Enero tiene 30). Entonces pones : para dias_cont=1 hasta dias_cont >= dias {son 30} y dento de este colocas un WriteLn(dias,'/',mes,'/04');