clc
clear all
close all
t=0:.001:10;
x=cos(2*pi*t);
y=x.^2;
plot(t,y)

legend('y(t)')

figure
plot(t+3,y)

legend('y(t-3)')

figure

xn=cos(2*pi*(t-3));
y2=xn.^2;
plot(t,y2)

legend('S[x(t-3)]')
```