Sacar Raiz pero no solo cuadrada

Iniciado por Zeroql, 12 Septiembre 2008, 18:12 PM

0 Miembros y 1 Visitante están viendo este tema.

Zeroql

buenas
miren mi problemas es que nesecito sacar una raiz cuaquiera de un numero cualquiera
que no sea cuadrada.
mirando por ahi vi que la funcion sqr solo saca raiz cuadrada, busque en MSDN y no encuntro como sacar ottrsa raices, por ejemplo que se necesita la raiz cubica de 9 debe dar 3 pero como se saca.
gracias
Dime y lo olvido, enseñame y lo recuerdo, involucrame y lo aprendo.
/.-ZEROQL.-\   -----  #937675#


cassiani

Conociendo que la raiz de un numero se obtiene elevandolo a la potencia inversa, se puede hacer lo siguinte:

Código (vb) [Seleccionar]
Private Sub Form_Load()
   MsgBox RaizA(14, 2) ' ejemplo1
   MsgBox RaizB(27, 3) ' ejemplo2
End Sub

Private Function RaizA(ByVal Radicando As Double, Indice As Double) As Double
    RaizA = Radicando ^ (1 / Indice)
End Function

Private Function RaizB(ByVal Radicando As Double, Indice As Double) As Double
    RaizB = Exp((1 / Indice) * Log(Radicando)) 'e elevado a la potencia x
End Function