Pascal/Turbo Pascal - necesito ayuda urgente

me dieron un trabajo en pascal y no se resolverlo,¿¿¿alguien me puede ayudar lo antes posible???yo le mandaria el enunciado. desde ya muchas gracias

Muchos podremos ayudarte.

Pero eso de "lo antes posible" quizá sea mucho pedir.

Y en cualquier caso, no te ayudaremos con "todo el trabajo", sino con dudas concretas que no sepas resolver.