Kubikwurzel?

[-=[ BladeX ]=-]

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