Seudo codigo metodo muller

MULLER:::::

Descargar Documento Ejercicio Muller: Muller.doc

using System;
using System.Collections.Generic;
using System.Text;
namespace Muller
{
classProgram
{
static double F(double x)
{
double F= Math.Pow(x,3)-13*x-12;
return F;
}
static void Main(string[] args)
{
Console.WriteLine("ingrese X0");double X0 = double.Parse(Console.ReadLine());
Console.WriteLine("ingrese X1");
double X1 = double.Parse(Console.ReadLine());
Console.WriteLine("ingrese X2");double X2 = double.Parse(Console.ReadLine());
Console.WriteLine("ingrese Eadm");
double Eadm = double.Parse(Console.ReadLine());
Console.WriteLine("ingrese n");double n = double.Parse(Console.ReadLine());
double h0,h1,d0,d1,A,B,C,R, denominador, h,X3;
int i = 1;
h0 = X1 - X0;
h1 = X2 - X1;
d0 = (F(X1) - F(X0)) / (X1 -X0);
d1 = (F(X2) - F(X1)) / (X2 - X1);
A = (d1 - d0) / (h1 + h0);
i = 3;
do
{
B = A * h1 + d1;
C=F(X2);
R=Math.Sqrt(Math.Pow(B,2)-(4*A*C));
 if (B+R>B-R){
denominador = B + R;
}
else
{
denominador = B - R;
}
h = (-2*C) / (denominador);
X3 = X2 + h;
if (Eadm>Math.Abs(h ))
{
Console.WriteLine(X3);Console.WriteLine(i);
goto id1;
}
X0 = X1;
X1 = X2;
X2 = X3;
h0 = X1 - X0;
h1 = X2 - X1;
d0 = (F(X1) - F(X0)) / h0;
d1 = (F(X2) - F(X1)) / h1;
A = (d1 - d0) /(h1 + h0);
i++;
} while (i<=n);
Console.WriteLine("NeuN");
id1:
 Console.ReadKey();

}
}
}

Se recomienda al estudiante que realice pruebas deescritorio así como de funcionamiento del presente programa mediante ejemplos conocidos, así como el desarrollo de el ejercicio que se muestra en el archivo enlazado.