Помогите, пожалуйста, написать программу на Pascal
и если не сложно, то с блок-схемой.

Если проблема ИМЕННО с программированием, то давайте математическое решение, а я его переведу в Паскаль