Прошу помощи.⁠⁠

Кто может, прошу помощи, если не можете, пожалуйста, просто поднимите в топ, и пройдите мимо, комменты для минусов есть. Задачи по Turbo Pascal.