Вспомогательные алгоритмы паскаль