disp ('mencari akar dengan metode newton');
x=input ('masukan suku awal');
f=input('masukan input');
f1=input('masukan turunan f(x) ');
x0=0;
n=1;
disp('==========================================');
disp(' n fx e');
disp('==========================================');
while abs(x-x0)>0.00000001;
fx=feval(f,x);
f1x=feval(f1,x);
e=abs(x-x0);
fprintf('%3.0f %10.8f %10.8f\n',n ,fx ,e)
x0=x;
x=x0-fx/f1x;
n=n+1;
end
akar=x;
fprintf('akarnya adalah %10.8f\n',akar)
sangat membantu terima kasih
ReplyDelete