% Harjutustund 13, ylesanne 6
x=[-1:0.1:-0.3];
y=[10,11,11.5,11.6,11.4,11.1,10,8.7];
trapz(x,y)
plot(x,y,'o')
% lähendame andmeid kuupsplainiga ja leiame integraali Simpsoni valemiga
xx=[-1:0.01:-0.3];
ys3=interp1(x,y,xx,'spline');
hold on
plot(xx,ys3)
f=@(z) interp1(x,y,z,'spline');
integral(f,-1,-0.3)

% ülesanne 7, pindala
x=[1:0.5:5];
y=[0,10,18,25,32.2,39,43,48,52.3];
plot(x,y,'o')
trapz(x,y)