вторник, 4 мая 2010 г.

Множество Жюлиа

Множество Жюлиа строится аналогично множеству Мандельброта, только величину C берут не с комплексной плоскости, а задаются ей вначале, для каждой же точки вычисляется число шагов, за которое последовательность итераций Zn+1=Zn2+С уйдёт из круга радиусом 2. 

Представленное здесь множество получается при C=0,31+0,47i .

При щелке на картинку, её можно скачать в разрешении 1024х768.




3 комментария:

  1. Анонимный1/10/10 09:27

    Че за пииииии....? Как написать это в Delphi?

    ОтветитьУдалить
  2. Достаточно просто - нужно сначала перевести каждый пиксель экрана в комплексное число, а затем с этим числом проделать указанные итерации. В зависимости от количества итераций для выхода за кргу радиусом 2, подбираем RGB-цвет.

    Где конкретно нужна помощь?

    ОтветитьУдалить
  3. Анонимный25/4/13 00:39

    Pascal ABC, надеюсь, в Делфи понятно..
    uses crt,GraphABC;
    const
    n=255;
    max=10;
    var
    z,z1,c: complex;
    i,ix,iy: integer;
    begin
    cls;
    SetWindowSize(400,300);
    c:=(0.6,0.9);
    for ix:=0 to WindowWidth-1 do
    for iy:=0 to WindowHeight-1 do
    begin
    z:=0.015*(ix-200,iy-140);
    for i:=1 to n do
    begin
    z1:=0.5*z*z+c;
    if abs(z1)>max then break;
    z:=z1;
    end;
    if i>=n then SetPixel(ix,iy,clGreen)
    else SetPixel(ix,iy,RGB(255-i,255-i,255));
    end;
    end.

    ОтветитьУдалить

Популярные сообщения

Темы

число цифра простые геометрия юмор дроби язык степень делимость пи методы история квадрат самоописывающее время задача система счисления узор корень тригонометрия структура е сайты конструкция формулы игра факториал функции приближение программа фрактал комбинаторика последовательность график память логарифм вероятность палиндром пределы конкурс треугольник магический квадрат неизвестное правильно-неправильное действие видео интеграл уравнение комплексные софизм заблуждения процесс ряды цитаты книги окружность прогрессия среднее стереометрия число фи выражения графы матрица проценты разрезания логика парабола символ статистика 2014 Фибоначчи клеточный автомат кривая производная фокус головоломка действия иллюзия куб шахматы многоугольник новости оказывается оригами подобие построение сложение термин тетраэдр топология