ezplot('x^2+2*y-8')
hold on
grid on
h=ezplot('x+y^2-y-3')
set(h,'Color','r')
legend('x^2+2y-8=0','x+y^2-y-2=0')
title('6. harjutuse 1. ülesanne')
%loeme jooniselt lõikepunktide koordinaadid alglähenditeks
%(-1,5;2,5) ja (-3,6;2) ja (2;1,5) ja (2,5;-0,2)

%defineerime funktsioonid f_1 ja f_2
f1=@(z)z(1)^2+2*z(2)-8; %z(1)=x ja z(2)=y
f2=@(z)z(1)+z(2)^2-z(2)-3; %ka siin on x asemel z(1) ja y asemel z(2)
F=@(z)[f1(z),f2(z)]; %tegime kahest funktsioonist vektori

%rakendame HIM
z=[-1.5,2.5]; %alglähend
while abs(F(z))>10^-5
    z(1)=-sqrt(8-2*z(2)); %x arvutamine 
    z(2)=sqrt(3+z(2)-z(1));
end
lahend1=z

z=[-3.6,-2]; %alglähend
while abs(F(z))>10^-5
    z(1)=-sqrt(8-2*z(2)); %x arvutamine 
    z(2)=-sqrt(3+z(2)-z(1)); %y arvutamine
end
lahend2=z

z=[2,1.5]; %alglähend
while abs(F(z))>10^-5
    z(1)=sqrt(8-2*z(2)); %x arvutamine 
    z(2)=sqrt(3+z(2)-z(1)); %y arvutamine
end
lahend3=z

z=[2.8,-0.1]; %alglähend
while abs(F(z))>10^-5
    z(1)=-z(2)^2+z(2)+3; %x arvutamine 
    z(2)=0.5*(8-z(1)^2); %y arvutamine
end
lahend4=z
    