Wie errechne ich die Zahl pi?

[glkgereon]

also wieso benutzt ihr ein quadrat mit a=2*r???

ich habn viertelkreis genommen....

einfach r=1 und a=r

Delphi-Quellcode:

while running do
  begin
  x:=random;
  y:=random;
  if x²+y²<1 then inc(pin);
  inc(p);
  Label1.Caption:=floattostr(4*pin/p);
  end;

fäddig...