Hallo
Ich kenne deine Folge zwar nicht aber es gibt eine Näherungformel nach Newton (siehe Anhang):
Public Function kubikwurzel(radikant as double)
Dim x as Double
dim i as Long
x=radikant/3
For i = 1 To 10
x = (2*x+radikant/(x*x))/3
Next
kubikwurzel = x
End Function
vielleicht hilft dir das.
mfg
|