Advertisement
Guest User

Untitled

a guest
Oct 23rd, 2018
81
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.32 KB | None | 0 0
  1. double bisekcja(double xp, double xk, double dokl)
  2. {
  3. if(f(xp)==0.0)return xp;
  4. if(f(xk)==0.0)return xk;
  5.  
  6. double srodek;
  7.  
  8. while(xk-xp > dokl)
  9. {
  10. srodek = (xp+xk)/2;
  11.  
  12. if(f(srodek) == 0.0) return srodek;
  13.  
  14.  
  15. if(f(xp)*f(srodek)<0) xk = srodek;
  16.  
  17. else xp = srodek;
  18.  
  19. }
  20. return (xp+xk)/2;
  21. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement