Áhugavert ekki satt..............
þ.e.a.s. áhugavert fyrir þá sem finnst svona lagað áhugavert!!!




while n < nmax & abs(f(c))>epsilon & abs(b-a) c=(a+b)/2;

if sign(f(a))~=sign(f(c)) % f(a) og f(b) eru með
b=c; % eru með olik formerki
end

if sign(f(b))~=sign(f(c)) % f(b) og f(c) eru með
a=c; % olik formerki
end

n=n+1;
end % lykkja endar

vpa(c,15); %fjöldi aukastafa c

disp(['Nullstodin er x =']) %skrifar ut gildi
disp([c])
disp(['Fjoldi itrekana n ='])
disp([n])
disp(['skekkjumatid er ='])
disp([abs(f(c))])