// avalia.sci

// recebe o vetor de coeficientes de
// um polinomio e o avalia em um ponto x

function y = avalia (c, x)
  [nl, nc] = size(c);
  
  y = 0;
  for i = 1:nl do
    y = y + c(i) * x^(i - 1);
  end
endfunction

