вторник, 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. 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 Фибоначчи клеточный автомат матрица производная статистика фокус головоломка кривая куб шахматы действия иллюзия новости оказывается оригами построение сложение термин тетраэдр