%lahendame x^3-8x+2=0

%Alglähendite leidmiseks teeme graafiku
%joonisel on ka x-telg ehk joon y=0
fplot(@(x)[x.^3-8*x+2,0])
grid on
legend('y=x^3-8x+2')
title('Joonis alglähendite leidmiseks')
%Jooniselt on näha, et joonel on 3 nullkohta. Valime need 
%alglähenditeks. Meile sobib -3 ja 0.25 ja 2.6.

%Defineerime võrrandi vasaku poole funktsioonina
f=@(x)x^3-8*x+2;

%Lahendame võrrandi
lahend1=fzero(f,-3)
lahend2=fzero(f,0.25)
lahend3=fzero(f,2.6)

%Kontrolliks paneme lahendi f(x) avaldisse ning peame vastuseks 
%saama 0 või väga väikese arvu.
kontroll1=f(lahend1)
kontroll2=f(lahend2)
kontroll3=f(lahend3)