Иллюстрированный самоучитель по Delphi 7 для начинающих

Кривая Гильберта

Следующая программа вычерчивает в диалоговом окне кривую Гильберта. На рис. 12.7 приведены кривые Гильберта первого, второго и третьего порядков. Если присмотреться, то видно, что кривая второго порядка получается путем соединения прямыми линиями четырех кривых первого порядка. Аналогичным образом получается кривая третьего порядка, но при этом в качестве "кирпичиков" используются кривые второго порядка.

Таким образом, чтобы нарисовать кривую третьего порядка, надо нарисовать четыре кривых второго порядка. В свою очередь, чтобы нарисовать кривую второго порядка, надо нарисовать четыре кривых первого порядка. Таким образом, алгоритм вычерчивания кривой Гильберта является рекурсивным.

Иллюстрированный самоучитель по Delphi 7 для начинающих › Рекурсия › Кривая Гильберта

Иллюстрированный самоучитель по Delphi 7 для начинающих › Рекурсия › Кривая Гильберта
Рис. 12.7. Кривые Гильберта первого, второго и третьего порядков

Диалоговое окно программы Кривая Гильберта, в котором находится кривая пятого порядка, приведено на рис. 12.8, текст программы – в листинге 12.4.

Иллюстрированный самоучитель по Delphi 7 для начинающих › Рекурсия › Кривая Гильберта
Рис. 12.8. Кривая Гильберта пятого порядка

Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.