кто разбирается в паскале? помогите пожалуйста с задачей

Уважаемая, здесь всегда рады помочь, но никогда не рады всё делать с нуля.
Покажите, что сделали вы, а мы дополним и укажем ошибки.
А хочется, чтобы полностью сделали за вас - платите.