clear
f=inline(input('ingresar f= ','s'),'x');
df=inline(input('ingresar df= ','s'),'x');
N=input('cantidad maxima de operaciones= ');
e=input('tolerancia= ');
j=0;
x=input('ingresar x0= ');
z=x-f(x)/df(x);
while j<N & abs(x-z)>e & abs(f(z))>e;%utilice la misma tolerancia para x-z como para f(x)
    [x z]
    x=z;
    z=z-f(z)/df(z);
    j=j+1;
end
solucion=x