Заранее благодарю. Нужно написать программу в Паскале по этой блок схеме:
Программа и пример её работы - в прилагаемом файле.