aula.sce

//algumas funcoes para teste.

deff("[y]=vareps(x)","a=1; while x+a>x, a=a/2; end; y=2*a;");

// Algoritmo de horner para polinomios.

deff("[y]=poli_normal(x)", "y=3*x**7 + 2*x**6 -5*x**5 -6*x**4 + 2*x**3 -x**2 -x+ 1");

deff("[y]=poli_horner(x)", "y=1+x*(-1 +x*(-1 + x*(2+x*(-6+x*(-5+x*(2+3*x))))))");

Generated by GNU enscript 1.6.3.