clc
close all
clear all

t=linspace(-3*pi,3*pi,200);
y=4*sin(3*t+pi/3);
f=cos(2*t+pi/3);
ff=@(t)cos(2*t+pi/3);
S=quad(ff,-3*pi,3*pi)
H=sqrt(S)
g=y+f;
h=y.*f;
k=sinc(t);
kk=@sinc;
S=quad(kk,-3*pi,3*pi)
H=sqrt(S)

subplot(5,1,1);
plot(t,y,'r');
xlabel('czas t[s]');
ylabel('y[t]');
grid on

subplot(5,1,2);
plot(t,f,'c');
xlabel('czas t[s]');
ylabel('f[t]');
grid on

subplot(5,1,3);
plot(t,g,'m');
xlabel('czas t[s]');
ylabel('g[t]');
grid on

subplot(5,1,4);
plot(t,h,'g');
xlabel('czas t[s]');
ylabel('h[t]');
grid on

subplot(5,1,5);
plot(t,k,'b');
xlabel('czas t[s]');
ylabel('k[t]');
grid on