Budownictwo 2006 Wydział Inżynierii Lądowej Politechniki Krakowskiej

gosik

Ma ktoś jakieś programy napisane i mógłby je umieścić na forum:?:

algebroman

program liczy miejsce zerowe funkcji x^2+5x-50 i drukuje ją:
------------------------------
function [x1,iter]=metoda_Newtona(a,b,eps);
fa=f(a);
fb=f(b);
if fa*fb>0
printf ("bł±d-przedział ab nie może byc przedziałem liczniea\n");
endif
x0=b;
for iter=1:150
x1=x0-f(x0)/fp(x0);
if abs(x1-x0)<eps && abs(f(x1))<1*e^-10
return;
end;
x0=x1;
end%iter
printf("bł±d-proces rozbiezny\n");
return;
endfunction
----------------------

function y=f(x)
y=x^2+5*x-50;
end
a=4
b=6
eps=1*e^-5;
function yp=fp(x);
yp=2*x+5;
endfunction
A=metoda_Newtona(a,b,eps);

function y=fun(x)
y=x.*x+5*x-50;
end
plot (x=a:0.2:b, y=fun(x), x=5, y=0, "o")
pause();

R2Rek

Wrzućcie coś jeszcze. Jakieś algorytmy.