%Ejercicio 1
%Apartado c)
%Beltrán Gutiérrez
t=linspace(0,1);
n=3;%grado
for i=0:n
    b=bernstein(n,i,t);
    plot(t,b);
    hold on;
end
xlabel('t');
ylabel('Polinomio de Bernstein grado 3');
title('Polinomios de Bernstein');
legend('B_3,0','B_3,1','B_3,2','B_3,3');