Фракталы
- From
- Vjacheslav Maslov (2:5000/231.60)
- To
- Dmitry Korobov ()
- Date
- 2003-03-07T00:56:50Z
- Area
- RU.ALGORITHMS
/*Доброго времени суток*/, Dmitry !
DK> Подскажите плз с чего начать для построения сабжа...
for X:=1 to MaxX ...
For Y:=1 To MaxY ...
C.Re:=X;
C.Im:=Y
repeat
Z[i+1]=Z[i]*Z[i]+C
Color:=Color+1;
until |Z|>4
SetColor(X,Y,Color);
Очень примерно, строит множество Мандельброта.
Могу выслать программку для изучения обращаться в email.
/*Всех благ*/, Dmitry
... *cooluser@ngs.ru*
* Origin: nothing original (2:5000/231.60)