Ejemplo de algoritmo recursivo: Raíz Cuadrada
![Imagen](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjt0_rzz2WEEAyjC1tNcuY_ENOEq046dshfa4shgPRTyJfPnVShxVtYo486TU50alUnuPsrp07tC-1VmC0jglKt8ZWJoH0ZcQ74RK5PohWQyVltglxzgaxg7eHB2VF61LnpoOf0KcSpxsrNci3X9EaO_n_LUgbPypGyze94Q4BDf0Ka6pgQb_cZVSn2Prda/w200-h161/Pal%C3%ADndromo.png)
Raíz Cuadrada (RC) de un número real positivo: La secuencia iterativa para la RC de Y es: X(n+1) = 1/2 * [ X(n) + Y / X(n) ] . Para Y < 1, un valor de inicio es: 1/2 * ( 1 + Y ) RC(Y) = S ( Y, 1/2 * ( 1 + Y ) ) Con S(Y,X) = [ (Y/X - X) < epsilon → X; S ( Y, 1/2 * ( X + Y/X ) ) ] La definición recursiva para la RC(Y) es: Función en MsExcel ( descargar y probar ). Un algoritmo recursivo para calcular la RC de Y es el siguiente: Dados el valor inicial de X = 1/2 * ( 1 + Y ) y un valor para E ( epsilon ), la función recursiva es como sigue: Función RaizC ( Y, X): real Si ( ( Y/X - X) < E ) entonces RaizC := X De lo contrario RaizC ( Y, 1/2 * ( X + Y/X ) ) {la función se invoca a sí misma} Fin del Si Fin de la función RaizC Y para que tengas otro ejemplo, estudie este simple programa en Pascal: Program ParImpar; Uses CRT; Var