* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки
Работа с геометрическими пакетами
843
Определим окружность c1, проходящую через три заданные точки A, B и C с указанными после их имен координатами и найдем координаты центра этой окружности:
> circle(c1,[point(A,0,0), point(B,2,0),point(C,1,2)], 'centername'=O1): > center(c1), coordinates(center(c1));
Далее найдем радиус окружности
> radius(c1);
и уравнение окружности, заданное в аналитическом виде:
> Equation(c1);
Наконец, с помощью функции detail получим детальное описание окруж ности: > detail(c1); name of the oblect: c1 form of the object: circle2d name of the center: O1 coordinates of the center: [1, 3/4] radius of the circle: 1/16*25^(1/2)*16^(1/2) equation of the circle: m^2+n^2 2*m 3/2*n = 0
10.9.3. Визуализация геометрических построений
Одно из важных достоинств пакета geometry – возможность наглядной визуа лизации различных геометрических понятий, например графической иллюстра ции доказательства теорем или геометрических преобразований на плоскости. Проиллюстрируем это на примере графической иллюстрации к одной из теорем Фейербаха – рис. 10.38. Здесь эффектно используются средства выделения гео метрических фигур цветом, что, увы, нельзя оценить по книжной черно белой ил люстрации. Рисунок 10.39 показывает гомологические преобразования квадрата. Заинте ресовавшийся читатель может легко разобраться с деталями простого алгоритма этой программы. Обратите особое внимание на последний параметр в функции draw. Он задает построение титульной надписи с заданными шрифтом и размером символов.