Форум программистов, компьютерный форум, киберфорум
C# Windows Forms
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 17.05.2017
Сообщений: 73
1

Фрактал, кривая Минковского

27.02.2019, 19:56. Показов 3592. Ответов 0
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Подскажите как добавить в мой код глубину рекурсии, ну то есть сложность самой кривой?

C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
   public partial class Form1 : Form
    {
         
        // (x1,y1) and (x2,y2) are the points, iter -
        Graphics g;
        Bitmap bmp;
        Pen pen = new Pen(Color.Blue, 2);
        Brush clr1 = new SolidBrush(Color.Blue);
       // int x = 30;
       // int y = 110;
        int length = 400;
        int granica = 430;
       int k = 120;
        int x1 = 50;
        int y1 = 200;
        int iter = 8;
        
 
 
        public Form1()
        {
            InitializeComponent();
            bmp = new Bitmap(pictureBox1.Width, pictureBox1.Height);
            g = Graphics.FromImage(bmp);
           // g.DrawLine(pen, x, y, x + length, y);
            pictureBox1.Image = bmp;
 
        }
        void Gor(int x,int y)
        { g.DrawLine(pen,x, y, x + k / 4, y);
            
            g.DrawLine(pen,x + k / 4, y + k /4, x + k / 4 + k / 4, y + k /4);
            g.DrawLine(pen,x + k /4 + k / 4,y - k / 4,x + k - k / 4,y - k / 4);
            g.DrawLine(pen,x + k - k /4, y, x + k, y);
            g.DrawLine(pen,x + k / 4, y, x + k / 4, y + k / 4);
            g.DrawLine(pen,x + k /4 + k /4, y + k / 4, x + k / 4 + k /4, y - k /4);
            g.DrawLine(pen, x + k - k / 4, y - k / 4, x + k - k / 4, y);
            pictureBox1.Image = bmp;
 
        }
        void Ver(int x,int y)
        {
            g.DrawLine(pen,x, y, x, y + k / 4);
            g.DrawLine(pen,x, y + k / 4, x - k / 4, y + k / 4);
            g.DrawLine(pen,x - k / 4, y + k / 4, x - k /4, y + k / 4 + k / 4);
            g.DrawLine(pen,x - k/ 4, y + k / 4 + k / 4, x + k / 4, y + k / 4 + k / 4);
            g.DrawLine(pen,x + k / 4, y + k/ 4 + k/4, x + k / 4, y + k - k / 4);
            g.DrawLine(pen,x + k / 4, y + k - k/ 4, x, y + k - k / 4);
            g.DrawLine(pen,x, y + k - k / 4, x, y + k);
            pictureBox1.Image = bmp;
        }
        void mink(int x,int y)
        {
            if (iter == 0)
            { g.DrawLine(pen, x, y, x + k, y); }
            else
            { //for (int i = 0; i < iter; i++)
               // {
                    Gor(x, y);
                    Ver(x + k, y);
                    Gor(x +k, y + k);
                    Ver(x + 2* k, y - k);
                    Ver(x + 2 * k, y1);
                    Gor(x + 2 * k, y - k);
                    Ver(x + 3 *k, y - k);
                    Gor(x + 3 * k, y);
                    pictureBox1.Image = bmp;
               // }
            }
            
            pictureBox1.Image = bmp;
            
 
        }
        private void button1_Click_1(object sender, EventArgs e)
        {
           
            
            mink(x1,y1);
            
            //pictureBox1.Image = bmp;
 
 
        }
 
        
        private void Form1_Load(object sender, EventArgs e)
        {
 
        }
    }
}
Добавлено через 9 минут
функция Gor строит горизонтальные кривые, а Ver - вертикальные, mink - это рисовка самой кривой
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.02.2019, 19:56
Ответы с готовыми решениями:

Кривая Минковского
Друзья, помогите! Нужно кривую Минковского сделать в паскале, вроде все как надо пишу, а совсем не...

Фрактал кривая Пеано
Столкнулся с проблемой. Нужно написать программу, которая выводит кривую Пеано, а грамотного кода,...

Фрактал, кривая Госпера. Ошибка, видимость переменных. Перевод с Паскаля на VB6
Задача была такая написать программу на VB переведя ее с Pascal ABC. Эта программа рисует фрактал...

Фрактал "Кривая дракона"
Еще одно небольшое задание для энтузиастов, вообщем у кого есть похожие приложения или вы знаете...

0
27.02.2019, 19:56
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.02.2019, 19:56
Помогаю со студенческими работами здесь

Кривая Коха, кривая Серпинского
Добрый вечер. Помогите пожалуйста. Очень срочно нужна готовая программа кривой Коха и кривой...

Фракталы Остров Минковского
Остров Минковского. Основа единичный квадрат. Генератор- ломаная с промежуточными точками: а) P1...

Кто живёт в пространстве Минковского ?!
Арман Ипполит Луи Физо в 1851г. обнаружил.

Объясните вывод формулы Минковского
Объясните, пожалуйста, выведение формулы Минковского с нуля чайнику.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru