Ich möchte eine Variable rekursiv Lösen lassen und habe mir deshalb ein Makro geschrieben das mittels eine Do until Schleife die berechnung solange durchführt, bis ein gewisser differenz betrag zwischen neuen und altenm Wert unterschritten wird. dabei ist mir aufgefallen, dass der endgültige Wert variiert, je nachdem von welchem anfangswert ich ausgehe.
meine Frage lautet deshalb ob mir jemand sagen kann, wo ich einen programmierfehler gemacht habe ( da die Formel stimmt), bzw ob mir jemand schon einmal so eine rekursive Formel programmiert hat die funktioniert.
Meine makro lautet an der betreffenden stelle folgendermassen:
n =1
alt = 0.0000001
Do Until (n - alt) < 0.000000000001
alt = n
a = (2.51 / (re * (alt ^ 0.5)))
b = (kd / 3.71)
c = a + b
d = (-2 * (Log(c) / Log(10#))) ^ (2)
n = 1 / d
Loop
dank im voraus und mfg Armin