Facebook
From Flying Parakeet, 6 Years ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 503
  1. function [y] = trapezowa(a,b,n,f)
  2. h = (b - a)/n;
  3. y = (feval(f,a) + feval(f,b))/2;
  4. for i = 1 : n-1
  5. y = y + feval(f,a+i*h);
  6. end
  7. y = h*y;
  8.  
  9. endfunction
  10.  
  11.  
  12.  
  13.  
  14. function [y] = funkcja1(x)
  15. y=sin(4*x)/x; // napiszac
  16. endfunction
  17.  
  18.  
  19.  
  20. clc
  21. clear all
  22. disp('Zad. 4')
  23. y=trapezowa(2,10,12,'funkcja1')
  24.