|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
10.12.2007, 14:16 | #1 |
Регистрация: 05.11.2007
Сообщений: 6
|
Построение кривых Серпинского и Гильберта Delphi
Помогите написать программу в делфи
Построение кривых Серпинского и Гильберта любого порядка Необходимо составить программу для построения кривых Серпинского и Гильберта любого порядка с возможностью их наложения друг на друга. Кривые Серпинского 1-го и 2-го порядка и их суперпозиция показаны на рисунке ниже. Кривая Серпинского 1- го порядка Кривая Серпинского 2 - го порядка Суперпозиция двух кривых Главная особенность кривой Серпинского в том, что она замкнута и в ней нет пересечений. Это означает, что основная рекурсивная схема должна давать разомкнутую кривую линию, четыре части которой соединяются прямыми отрезками отдельно (на вышеприведенном рисунке слева они выделены жирными линиями). Узор на приведенном ниже рисунке состоит из суперпозиции четырех кривых Серпинского. Кривые Гильберта первого, второго и третьего порядка показаны ниже. Кривая Гильберта второго порядка получается путем соединения прямыми линиями четырех кривых первого порядка, две из которых повернуты на 90°: одна по часовой стрелке, другая – против. Кривая 3-го порядка строится из четырех кривых второго порядка и т.д. |
10.12.2007, 14:43 | #2 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Вот пример кривой Гильберта с какого-то диска по Delphi 7. Программа работает. Поставишь только порядок, какой тебе нужно.
|
10.12.2007, 15:14 | #3 |
Регистрация: 05.11.2007
Сообщений: 6
|
puporev Спасибо тебе БОЛЬШОЕ .
|
07.10.2017, 11:42 | #4 |
Новичок
Джуниор
Регистрация: 07.10.2017
Сообщений: 1
|
а не подскажешь как изменить код кривой гильберта, чтобы рисовалось рандомное дерево? ну сначала ствол, а потом ветки(каждый раз рандомно)
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
построение окружности по 3 точкам в Delphi | ксона | Помощь студентам | 16 | 12.12.2009 17:14 |
Построение диаграмм из БД | ChiToK | Помощь студентам | 3 | 21.04.2008 10:38 |
Построение графика | KARSH | Общие вопросы Delphi | 3 | 28.05.2007 17:05 |