Algoritmia - Ingeniero Sistemas

% METODO DE BISECCION
% Realizado por el Ingeniero David Samaniego B.
% Metodo de Bisecciones, crea el vector y el intervalo a revisar
% y en un lazo hacemos el resto del calculo

function Biseccion
clc;
vector=[3 4 0 -10];
a=1;b=2;
fprintf(' METODO DE BISECCION ');
fprintf(' n a b p ');
fprintf('----------------------------------------- ');
if polyval(vector,a)*polyval(vector,b) < 0
E = 0.0001;
i=1;
while 1
p_act = (a+b)/2;
fprintf('%2.f %5.4f %5.4f %5.4f ',i,a,b,p_act);
fprintf('----------------------------------------- ');
if polyval(vector,a) * polyval(vector,p_act) < 0
b = p_act;
else
a = p_act;
end

if abs(a-b) < E || polyval(vector,p_act) == 0
break;
end
i=i+1;
end
fprintf(' La raiz en el intervalo es %f',p_act);
else
fprintf('No hay raiz en este intervalo');
end
end

elabore un algoritmo en donde se tiene 3 arreglos a, b, c de n elementos se deve crear otro arreglo nuevo de 3 elementos donde cada elemento tenga la suma de los elementos de cada arreglo