Recursividad
erika
25 de Marzo del 2004
Ayuda para hacer un programa aplicando recursividad,.
en?
25 de Marzo del 2004
erika, no está clara la ayuda que pides, te doy un ejemplo de función recursiva, a ver si sirve de algo:
Public Function Factorial(Numero As Double) As Double
Dim Res As Double
If Numero = 1 Then
Factorial = 1
Exit Function
End If
Res = Numero * Factorial(Numero - 1)
Factorial = Res
End Function
Public Function Factorial(Numero As Double) As Double
Dim Res As Double
If Numero = 1 Then
Factorial = 1
Exit Function
End If
Res = Numero * Factorial(Numero - 1)
Factorial = Res
End Function