Метод хорд паскаль программа