aula_de_numerico1.sce

// Este é uma arquivo com os primeiros exemplos de scilab */
// Soma da serie harmonica não converge */
deff("[y]=hsum(x)","S=0,for i=1:x, S=S+1/i; end; y=S;");
deff("[y]=hsum_sci(x)", "v=[1:x];y=sum(v^(-1));");

// sum(1/n^4) converge para o numero de euler %pi^4/90 */

deff("[y]=euler_gama(x)","S=0; for i=1:x, S=S+1/i^4; end; y=S;");
deff("[y]=sci_euler_gamma(x)", "v=[1:x]; y=sum(v^(-4));");

// gráficos simples:
x=[-%pi:0.2:%pi];
y=x**3 +2*x**2 -3*x;
plot2d(x,sin(x));
plot2d(x,[sin(x);cos(x); y]', rect=[-3,-5,2,5]);