function sin2x
x=0:0.01:4*pi;
%y=vypocet(x);
%plot(x,y)
subplot(2,1,1)
plot(x,vypocet(x),'r')
xlabel('x[rad]')
ylabel('y')

x=0:0.01:720;
subplot(2,1,2)
plot(x,vypocet2(x),'k--')
xlabel('x[stupen]')
ylabel('y')

end

function y=vypocet(x)
y=sin(x).^2; % radiany
end

function y=vypocet2(x)
y=sind(x).^2; % stupne
end

