Fractale espace de mandelbrot
Description
Un petit programme avec une interface très moyenne, mais on vit de belles courbes. Le moteur de ça et la boucle :
while(compt <=limite) and (module<4) do
begin
aux:=x;
x:=sqr(x) - sqr(y) +p0;
y:= 2*y*aux + q0;
module :=sqr(x)+sqr(y);
inc(compt);
end;
Le reste sert à l?affichage
Il suffit de cliquer dans la fenêtre a l?endroit que l?on veut visionner. Le champ zone donne la taille de la zone a visionner (en réduisant la valeur on zoome). Le champ limite donne le nombre d?itération avant la sotie de la boucle. Le premier passage donne le même résultat que l?excellant programme de GILMI le deuxième il y a des couleurs en plus et c?est bô.
while(compt <=limite) and (module<4) do
begin
aux:=x;
x:=sqr(x) - sqr(y) +p0;
y:= 2*y*aux + q0;
module :=sqr(x)+sqr(y);
inc(compt);
end;
Le reste sert à l?affichage
Conclusion :
Il suffit de cliquer dans la fenêtre a l?endroit que l?on veut visionner. Le champ zone donne la taille de la zone a visionner (en réduisant la valeur on zoome). Le champ limite donne le nombre d?itération avant la sotie de la boucle. Le premier passage donne le même résultat que l?excellant programme de GILMI le deuxième il y a des couleurs en plus et c?est bô.
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.