clear %vahemälu puhtaks

%algandmed
t=0:0.4:3.6;
x=[3.1 3.8 4.9 6.5 8.4 9.9 11 11.5 11.7 11.8];
%võrk
tvork=0:0.001:3.6;

%lähendamine
%1) ruutfunktsioon
kordajadruut=polyfit(t,x,2);
xruut=polyval(kordajadruut,tvork);

%2) kuupfunktsioon
kordajadkuup=polyfit(t,x,3);
xkuup=polyval(kordajadkuup,tvork);

%joonis
plot(t,x,'r*',tvork,xruut,'b',tvork,xkuup,'k')
legend('algandmed','ruutfunktsioon','kuupfunktsioon')
xlabel('aeg sekundites')
ylabel('vahemaa detsimeetrites')
title('Ülesanne 83')

%arvutamine
vastus1=polyval(kordajadruut,1.8)
vastus11=polyval(kordajadkuup,1.8)

vastus2=polyval(kordajadruut,3.5)
vastus22=polyval(kordajadkuup,3.5)
