function s=algoritmo1(a,x)

s=a(1); % COMPONENTE a_0 IMMAGAZZINATA IN a(1).
xk=1;
for i=2:length(a)
   xk=xk*x;
   s=s+a(i)*xk;
end