1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

while(n <= 180)
{
        z[n] = (z[n-1]^2) + c;

        if(abs(z[n]) > 2)
        {
            break;
        }
        ++n;
}

(*abs() = Betrag von...)

1:
2:
3:
4:
5:
6:
7:
8:
9:

complex_n complex_n::operator^(double n)
{
    x = x*x - y*y ;
    y = 2*x*y;

    return *this;

}

1:
2:
3:
4:
5:
6:
7:
8:
9:

complex_n complex_n::operator^(double n)
{
    double xtmp = x*x - y*y ;
    y = 2*x*y;
    x = xtmp;

    return *this;

}

1:
2:
3:
4:

double complex_n::abs(complex_n a)
{
    return sqrt(a.x*a.x+a.y*a.y);
}

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

int complex_n::mandelbrot(complex_n c)
{
    int n = 1;
    complex_n z[180];
    z[0] = c;

    while(n <= 180)
    {
        z[n] = (z[n-1]^2) + c;

        //z[n].out(); cout<<" n: "<<n;

        if(abs(z[n]) > 4)
        {
            break;
        }
        ++n;
    }

    return n;
}

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:

DEF FNnorm (x, y, n)
 j = 1
 xa = x: ya = y
 DO WHILE j <= n
  xb = x
  IF ABS(x) < 20 AND ABS(y) < 20 THEN T = 1 ELSE T = 0
  IF T = 1 THEN x = x ^ 2 - y ^ 2 + xa
  IF T = 1 THEN y = 2 * xb * y + ya
  j = j + 1
 LOOP
 FNnorm = (x ^ 2 + y ^ 2) ^ .5
END DEF


CLS : SCREEN 12: REM with 640x480 Pixel
 v = 4: K = 1

 DO WHILE K <= 200000
  x = RND * 4 - 2
  y = RND * 4 - 2
  R = FNnorm(x, y, 12)
  IF R < 2 THEN PSET (v * x * 35 + 320, v * -y * 40 + 240), 1
  K = K + 1
 LOOP

 PSET (v * 1 * 35 + 320, -v * 0 * 40 + 240 + 4)
 FOR L = 5 TO 635 STEP 35
  PSET (L, 240)
 NEXT L
 FOR L = 40 TO 440 STEP 40
  PSET (320, L)
 NEXT L
 COLOR 0: INPUT " ", wait$
END



#Datei apple.py
import math
import Image, ImageDraw 

black = (0,0,0)
size = (1000,1000)
im = Image.new("RGB", size, (255,255,255))
draw = ImageDraw.Draw(im)

def isapp(cx, cy):
  i=0; x = 0.0; y = 0.0
  while i<15:
    if x>2 or x<-2: break
    if y>2 or y<-2: break
    xt = x**2 - y**2 + cx
    yt = 2*x*y + cy
    x = xt
    y = yt
    i+=1
  if math.sqrt(x**2+y**2)<2: return True
  else: return False

tx=-2; ty=-2
while tx<=2:
  ty=-2
  while ty<=2:
    if isapp(tx,ty):
      sx = 200*tx+600
      sy = -200*ty+500
      draw.rectangle([sx,sy,sx+1,sy+1], fill=black)
    ty+=0.01
  tx+=0.01

del draw
im.save("apple.png","PNG")