primeiraregradeSimpson

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

function I=Psimpson(a,b,x,y,n) // n= subintervalos
 h=(b-a)/n;
 I=y(1)*x(1)// comeca com o primeiro elemento
 for i=2:n
 if modulo(i,2)==0 // se for par multiplica 4
 I=I+4*y(i)*x(i);
 end
 if modulo(i,2)==1 
 I=I+2*y(i)*x(i);
 end
 end
 I=(h/3)*(I+y(n+1))*x(i);
endfunction