% Tund 5, ülesanne 1
% x^3-2x-4=0
% funktsiooni defineerimine
f=@(x) x^3-2*x-4;
% tuletise defineerimine
ftuletis=@(x) 3*x^2-2;
% joonis
fplot(f)
yline(0)
grid on
% alglähend
% alglähendiks võime võtta 2 (jooniselt)
% Newtoni meetodi eeskiri
x=2;
i=0;
while abs(f(x))>10^(-3)
  x=x-f(x)/ftuletis(x) % Newtoni meetodi eeskiri
  i=i+1;
end
lahend=x
sammud=i