%võrrandite ligikaudne lahendamine

%Leiame alglähendi graafiliselt
fplot(@(x)[x.^3-8*x+2,0])
grid on
title('Joonis alglähendi leidmiseks')
legend('x ^3-8*x+2','y=0')
%Jooniselt on näha, et joontel on kolm lõikepunkti => võrrandil on kolm
%lahendit. Valime x-koordinaadid alglähenditeks. Meile sobivad x=-3, x=0.2
%ja x=2.7.

%Defineerime võrrandi vasaku poole funktsioonina
f=@(x)x^3-8*x+2;
lahend1=fsolve(f,-3) %-3 on alglähend jooniselt
lahend2=fsolve(f,0.2) %0.2 on alglähend jooniselt
lahend3=fsolve(f,2.7)

%Kontrolliks asendame lahendi võrrandisse ja saame 0 või väga väikese arvu
kontroll1=f(lahend1)