Pascal/Turbo Pascal - Ayudenme

Hola nesecito un programa que tenga 5 o mas variables que use 1 o mas sentencias de desicion y que utilice sentenciuas repetitiva (repeat,while) y que no se pase de 30 lineas.todo hecho en pascal lo nesecito con todo hasta los codigos.por favor

atte.Diego Duran
[email protected]