Free Pascal. 15 задание.
Решение задания в приложенном файле
Вы гений :}
Огроме-е-енное спасибо.
Всегда пожалуйста