% Harjutustund 5, ülesanne 1
y=@(x) x^5-x^2-2;
ytuletis=@(x) 5*x^4-2*x;
fplot(y,[-2,2])
yline(0)
grid on
% 1) Newtoni meetodiga
% alglähendiks võime võtta 1.3
x=1.3;
sammud=0;
while abs(y(x))>10^(-5)
  x=x-y(x)/ytuletis(x);
  sammud=sammud+1;
end
lahendnewton=x
sammudnewton=sammud
% 2) lõikajate meetodiga
% alglähenditeks võime võtta 1.3 ja 1
x0=1.3;
x1=1;
sammud=0;
while abs(y(x1))>10^(-5)
  x2=x1-(x1-x0)/(y(x1)-y(x0))*y(x1);
  x0=x1;
  x1=x2;
  sammud=sammud+1;
end
lahendloikajad=x
sammudloikajad=sammud