function megoldasok=zh1_feladat3_zseta()
% 3) Tölsd be a zh1_feladat3_archivum.mat fájlt, mely egy mérés értékeit
%    (y) tartalmazza adott id?pontokban (t).
load zh1_feladat3_archivum
% a) Illessz egy harmadfokú(P3) és egy hatodfokú(P6) polinomot az 
%    adatsorra.
P3=polyfit(t,y,3);
P6=polyfit(t,y,6);
% b) Az els? és az utolsó mérési pontok között határozd meg 180 pont fölött
%    mindkét polinom maximumát.
t180=linspace(t(1),t(end),180);
p3_180=polyval(P3,t180);
p6_180=polyval(P6,t180);
p3_180_max=max(p3_180);
p6_180_max=max(p6_180);
% c) Határozd meg a polinomok gyökeit.
p3_roots=roots(P3);
p6_roots=roots(P6);
% d) Vizsgáld meg a polinomok viselkedését a [9,5; 13] zárt értelmezési 
%    tartományon, 90 mintaponttal! Határozd meg a polinomok minimumát!
t90=linspace(9.5,13,90);
p3_90=polyval(P3,t90);
p6_90=polyval(P6,t90);
p3_90_min=min(p3_90);
p6_90_min=min(p6_90);
% e) Keresd meg az els? id?pontot, amikor a két polinom értékének 
%    különbsége eléri, vagy meghaladja a 0,1 értéket.
kulonbsegek=abs(p3_90-p6_90);
elso_index=find(kulonbsegek>=0.1,1);
elso_idopont=t90(elso_index);
% f) Az elvégzett számításokat tedd be egy függvénybe, ami visszaadja a 
%    számított polinom együtthatókat, maximumokat, gyököket, minimumokat, 
%    valamint az id?pontot.
megoldasok=[P3,P6,p3_180_max,p6_180_max,p3_roots',p6_roots',...
    p3_90_min,p6_90_min,elso_idopont];
end