Halli hallo, hallöchen.
Hab dieses Skript:
;Der Gaußsche Algorithmus zur Berechnung der Nachkommastellen von Pi
#include<array.au3>
#include<bignum.au3>
local $a[2]
local $b[2]
local $t[2]
local $p[2]
$i=0
$a[0]= 1
$b[0]= 1/sqrt(2)
$t[0]= 1/4
$p[0]=1
while 1
$i+=1
$a[$i] = ($a[$i-1]+$b[$i-1])/2
$b[$i]= sqrt($a[$i-1]*$b[$i-1])
$t[$i]= $t[$i-1]-$p[$i-1]*($a[$i-1]-$a[$i])^2
$p[$i]= 2*$p[$i-1]
_arrayadd($a, $a[$i])
_arrayadd($b, $b[$i])
_arrayadd($t, $t[$i])
_arrayadd($p, $p[$i])
Msgbox(0, "", _bignum_div(_bignum_pow((_bignum_add($a[$i-1], $b[$i-1])),2), _bignum_mul(4, $t[$i-1])))
wend
Erklärt sich glaub von selbst, ansonsten http://en.wikipedia.org/wiki/Gauss%E2%…endre_algorithm
1. Weiter als 48 Nachkommastellen gehts hier nicht. Sollte ich in dem Fall bignum schon bei den obrigen Variabeln anwenden?
2.
2. Repeat the following instructions until the difference of a_n\! and b_n\! is within the desired accuracy:
Versteh ich eigentlich. Aber wie bitte soll ich das mit ner Do-until-Schleife machen? Was für eine accuracy ist denn gewünscht? So wie ich das seh, gehts mit der while-schleife auch ganz angenehm.
Irgendwelche Codebeispiele oder fertige Programme will ich net (ich weiß, hört sich komisch an). Möchte alles selber machen, brauche nur nen kleinen Tipp.
danke,
billie
