طلب لا هنتم عندي هذا الكود مدري بأي لغه والله عقدني بس تشغيله على ال matlap7 المهم هو عباره عن function بس اللغه غرييبه شوي اللسي يفهمها الله لا يهينكم يوضحها لي
function [root,nit,x,fn] = secant(f,a,b,tol)
x(1) = a; fn(1) = feval(f,x(1));
x(2) = b; fn(2) = feval(f,x(2));
it = 1;
while abs(fn(it+1)) > tol
x(it+2) = x(it+1) - fn(it+1) * (x(it+1) - x(it)) / (fn(it+1) - fn(it));
fn(it+2) = feval(f,x(it+2));
it = it + 1;
end
root = x(it+1);
nit = it - 1;
وهذا الكود بعد
function [xl,xu,fl,fu] = bisect(f,a,b,tol)
fa = feval(f,a); xl(1) = a; fl(1) = fa;
fb = feval(f,B); xu(1) = b; fu(1) = fb;
it = 1;
len = abs(b-a);
while len > tol
c = (a+B)/2; fc = feval(f,c);
if sign(fb) ~= sign(fc)
a = c; fa = fc;
elseif sign(fa) ~= sign(fc)
b = c; fb = fc;
else
a = c; b = c; fa = fc; fb = fc;
end
it = it + 1;
xl(it) = a; fl(it) = fa;
xu(it) = b; fu(it) = fb;
len = abs(b-a);
end
البرنامجين عباره عن series ل function معينه بس أشياء ما فهمتها مثل feval و ~= و sign
ياريت اللي فهم هذا الكود يقولي بأقصى سرعه
هذا الموضوع مغلق.
