Algoritmos y Programación en Pascal

11.4. Ejercicios 251
(a) Defina un tipo para representar los meses del año, así como subprogramas
apropiados para su lectura, mediante sus letras iniciales, y escritura, ofreciendo
siempre su nombre (o su número).
(b) Defina la función ProximoMes, y empléela en un programa que, a partir de
un mes dado, ofrece los siguientes n meses.
(c) Defina la función MesAnterior, con un argumento esteMes, que repasa la
lista de los meses posibles hasta dar con uno, mesAnt, de manera que se
obtengaProximoMes(mesAnt) ❀esteMes. Ignore la existencia de la función
estándar Pred.
(d) Integre los apartados anteriores en un programa que escriba una tabla con
los meses del año, y para cada uno, su mes anterior y siguiente.
5. Escriba un programa que lea los caracteres del input hasta su final, desprecie
los que no son letras mayúsculas y, con éstas, forme el conjunto de las que no
aparecen, el de las que aparecen una vez y el de las que aparecen más de una.
6. Partes de un conjunto
(a) Dado un conjunto C, desarrolle un programa que escriba en la pantalla todos
los posibles subconjuntos de C, esto es, el conjunto de sus partes, P(C).
(b) Escriba un programa para mostrar que todo conjunto C tiene 2 n subconjuntos,
siendo n = card(C). Para ello, modifique el programa anterior de
manera que genere las partes de C y las cuente en vez de escribirlas en la
pantalla.
7. Combinaciones de un conjunto
(a) Dado un conjunto C, de cardinal m, desarrolle un programa que escriba
en la pantalla todas las posibles combinaciones que pueden formarse con n
elementos de C, siendo n ≤ m.
(b) Escriba un programa que cuente el número de combinaciones descritas en el
apartado anterior.