Raíces de ecuaciones: Método de la secante, código C | Roots of equations: Secant's method, code C

#include <stdio.h>
#include <math.h>
#include <conio.h>
#include <stdlib.h>
#define F(x)(x*x)-4
#define FD(x)(2*x)
#define FP(x)(x*x)+x-4
#define FE(x,y)(x*y)+1

void main()
{
clrscr();
float x0,x1,x2,f1,f2,f0;
int i,j;
clrscr();
do
{
gotoxy(10,6); printf("                 METODO DE LA SECANTE ");
gotoxy(10,7);printf("------------------------------------------------------------");
gotoxy(10,8);printf(" Este codigo fue hecho por Jair Beltran USCO Garzon ");
gotoxy(10,9);printf("Se hallara la raiz de la funcion f(x)=x^2-4 tol=10^-5 iter max=9");
gotoxy(10,10);printf("Digite el primer valor hasta cuando el programa le permita seguir: ");
scanf("%f",&x0);
}
while(F(x0)>0);
do
{
gotoxy(10,11); printf("Digite el segundo valor hasta cuando el programa le permita seguir: ");
scanf("%f",&x1);
}
while(F(x1)<0);
gotoxy(10,11); printf("----------------------------------------------------------------------");
gotoxy(10,12); printf("|  No  |    x0    |    f(x0)    |    x1    |     f(x1)   |    x2     |");
gotoxy(10,13); printf("----------------------------------------------------------------------");
i=14;
j=1;
do
{
f0=F(x0);
f1=F(x1);
x2=x1-(((x0-x1)/(f0-f1))*f1);
f2=F(x2);
gotoxy(10,i++);printf("%3d %12.6f %12.6f %12.6f %12.6f %12.6f",i-14,x0,f0,x1,f1,x2);
if(f0*f2<0)
{
x1=x2;
}
else
{
x0 = x2;
}
j=j+1;
}
while(fabs(f2)>0.00001 && (j<10));
{
gotoxy(10,23); printf("La raiz encontrada es igual a %10.5f",x2);
gotoxy(10,24);  printf("Presione una tecla para continuar");
getch();
}
}

Raíces de ecuaciones: Método de la secante, código C++ | Roots of equations: Secant's method, code C++

#include <iostream>
#include <cstdio>
#include <cmath>
using namespace std;
float fun (float x);
int main() {
float error=0.00001,x0,x1,x2,Ea;
 printf ("Este codigo fue hecho por Jair Beltran USCO Garzon");
printf ("Digite el primer valor ");
scanf ("%f",&x0);
printf ("Digite el segundo valor ");
scanf ("%f",&x1);
Ea=error+1;
while (Ea>error)
{x2=(x1-((x0-x1)/(fun(x0)-fun(x1))*fun(x1)));
printf ("%f \n",x2);
Ea=(fabs (x1-x2));
x0=x1;
x1=x2;
}
printf ("la raiz es:%f \n",x2);
return 0;
}
float fun(float x)
{float f;
f=x*x-4;
return f;
}