%Tund nr 4, ülesanne 1
% lahendame võrrandi x^3-2x-4=0 Newtoni meetodiga

% jooniselt uurime, kus asuvad võrrandi täpsed
% lahendid
% defineerime funktsiooni
f=@(x) x.^3-2*x-4;
% graafik
fplot(f,[1,3])
grid on
yline(0)
% jooniselt on näha, et alglähendiks x0 võime
% võtta 1.8
x=1.8;
ftuletis=@(x) 3*x^2-2;
i=0; % sammude arv
while abs(f(x))>10^-5
    x=x-f(x)/ftuletis(x);
    i=i+1;
end
lahendNM=x
sammudNM=i

% võtame alglähendiks 2
x=2;
ftuletis=@(x) 3*x^2-2;
i=0; % sammude arv
while abs(f(x))>10^-5
    x=x-f(x)/ftuletis(x);
    i=i+1;
end
lahend2NM=x
sammud2NM=i