FoxPro/Visual FoxPro - Recursividad

 
Vista:

Recursividad

Publicado por RafaelLo (62 intervenciones) el 05/07/2002 17:59:40
Necesito que alguien me de algun tip de como puedo emplear algun algoritmo de Recursividad en Visual Fox Pro, necesito un algoritmo de recursividad si alguien lo tiene por ahi, le agradeceria mucho que me lo mandara o que me diga en que sitio de la web lo puedo encontrar..
Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Recursividad

Publicado por LightBrother (77 intervenciones) el 08/07/2002 18:34:10
Rafael, Acabo de leer tu mensaje y te hice un procesito, en verdad muy chico, para calcular el facturial. Copialo a un PRG y pruebalo. Es solo una de las fomas de hacer recursividad.

LPARAMETERS pnNumero
IF pnNumero = 0
pnNumero = VAL(INPUTBOX("ingrese un número, para calcular el factorial"))
ENDIF

lnResult = Proceso(pnNumero)
WAIT WINDOW STR(lnResult)

FUNCTION Proceso
LPARAMETERS pnNumero
IF pnNumero > 1
pnNumero = pnNumero * (proceso(pnNumero - 1) )
ENDIF
RETURN pnNumero
ENDFUNC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Recursividad

Publicado por Rafaelo (62 intervenciones) el 09/07/2002 17:25:56
Gracias carnal, por el ejemplito lo probare para ver que tal...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Recursividad

Publicado por Gustavo (1 intervención) el 20/11/2022 12:49:53
Muchas gracias amigo. Dios te bendice
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar