function graf
x=-2*pi:0.01:2*pi;
y=4+sin(x.^2);
plot(x,y,'r')
end

