clear
% Tund nr. 9, ülesanne 3

% esitame lähteandmed
s=[0:0.25:1.25];
t=[0,25,49.4,73,96.4,119.4];

% esitame andmed tabelina
disp([s;t])

% märgime lähteandmed joonisele
plot(s,t,'o')
hold on
%a)  lähendame andmeid lineaarsplainiga S^1,0
svork=[0:0.1:1.25];
tlineaarsplainiga=interp1(s,t,svork,'linear');
plot(svork,tlineaarsplainiga,'r')
hold on
%b) lähendame andmeid kuupsplainiga S^3,2
tkuupsplainiga=interp1(s,t,svork,'spline');
plot(svork,tkuupsplainiga,'b')
%c) leiame aja, mis kulub hobusel 0,45 miili läbimiseks
aeglineaar=interp1(s,t,0.45,'linear')
aegkuup=interp1(s,t,0.45,'spline')