kaburen

met_siecznychv2

Apr 9th, 2019
154
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
MatLab 0.29 KB | None | 0 0
  1. function [wyn] = met_siecznychv2(g,a,b)
  2. f = @(x)eval(g);
  3. ep = 0.001;
  4. if(f(a)*f(b)>0)
  5.    disp('Punkty nie spelniaja zalozen')    
  6.    return;
  7. end
  8. while(abs(f(b))>ep)
  9.     c = a - f(a)*(a-b)/(f(a)-f(b));      
  10.     a = b;  
  11.     b = c;    
  12. end
  13. wyn = c;
  14. end
  15. %met_siecznychv2('x^3+x^2-1',0,2)
Advertisement
Add Comment
Please, Sign In to add comment