Вероятностные методы и фракталы в построении графиков

[Felix]

Помогите с теорией. Я ни где не найду описания и принцип работы, а только готовые программы.

[mihali4]

На Рамблере. Вводим : "фракталы" или "вероятностные методы".
В найденном ищем (опять вводим с отмеченной галкой "в найденном"):
"построение графиков"...
И упиваемся теорией по самые ... ну, в общем, понятно.

[preporidze]

Вроде работает - строит Множество Мандельброта
Как использовать не знаю - Говорят можно.
Вообще для построения графиков используют Интерполяцию Экстраполяцию и Апроксимацию про Фракталы не слышал.
ВСе Интерполяции более менее приминимые - Ньютон , Батерворт +
Конечно же ЧЕбышев !

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Math;

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
yy,xx,n : Integer;
y,x,cx,cy,ix,iy,x1,y1 : Real;


begin
yy:=-1;
y:=-1;
while (y<1) do
begin
yy:=yy+1;
xx:=-1;
x:=-2;
while (x<1) do
begin
xx:=xx+1;
cx:=x;
cy:=y;
x1:=x;
y1:=y;
ix:=0; iy:=0; n:=0;
while ((ix*ix + iy*iy < 4) and (n < 64)) do
begin
ix:=x1*x1 - y1*y1 + cx;
iy:= 2*x1*y1 + cy;
n:=n+1;
x1:=ix;
y1:=iy;
end;



Canvas.Pixels[xx,yy]:=Round(262144*n);
x:=x+0.01
end;
y:=y+0.01
end;


end;

end.

[Вавел из ГМТУ]

Я думаю, что спустя 2,5 года автору уже не нужно решение этой задачи