clear %vahemälu puhtaks
f=@(x)(tan(x)).^2.*exp(x);
format long
integraal1=integral(f,-1,1)

%võrdluseks trapetsvalemiga ka
%teeme 2 vektorit
x=-1:1e-3:1; %integraali rajad annavad meile vektori esimese ja viimase
%väärtuse
y=f(x);
integraal2=trapz(x,y)
format short
