Integrallarni taqribiy hisoblash


Aniq integralni taqribiy hisoblashning trapetsiya va Simpson usullari


Download 150.65 Kb.
bet2/3
Sana19.06.2023
Hajmi150.65 Kb.
#1612756
1   2   3
Bog'liq
17.Integralni taqribiy hisoblash usullari

Aniq integralni taqribiy hisoblashning trapetsiya va Simpson usullari
Ushbu aniq integralning kiymatini trapetsiya va Simpson usullari yordamida hisoblash algoritmi va dasturlarini ko’rib utamiz. Integralni kiymatini taqribiy xisolashning to’g’ri turtburchak usulini o’quvchilarning o’zlariga xavola etamiz.


bu yerda а=0b=2, oralikni 20 bo’lakka bulamiz, ya‘ni n=20 deb olamiz.
Dastlab trapetsiya formulasidan, sung Simpson formulasidan foydalanib integralni kiymatini taqribiy hisoblash algoritmining blok- sxemasini, sung dasturini tuzamiz.
Integralni taqribiy hisoblashda integral ostidagi funktsiyani kullanuvchining funktsiyasi sifatida yozib olamiz,
ya‘ni
f(x)=ln(x2+3x+1)
ko’rinishida yozib olib, bu funktsiyadan blok–sxema va dastur tuzishda foydalanamiz. Foydalanuvchining funktsiyasini algoritm va dasturda f harfi bilan, funktsiyani a nuqtadagi kiymatini f(a) va b nuqtadagi kiymatini f(b) bilan, bo’linish kadamlarini i harfi bilan, bo’laqlar sonini n harfi bilan, oralikchalar uzinligini h harfi bilan, integral osti yigindisini s harfi bilan, integralning kiymatini esa harfi bilan bilgilab olamiz.
  1. Trapetsiya usuli


program trapesiya;
var n,i,k:integer; a,b,h,s:real;
function f(x:real):real; begin f:=x*x end; procedure trap(a,b:real;n:integer; var s:real); var i:integer; h:real;
begin h:=(b-a)/n; s:=(f(a)+f(b))/2;
for i:=1 to n-1 do s:=s+f(a+i*h); s:=s*h; end; begin
write('a,b,n=');readln(a,b,n); trap(a,b,n,s);
writeln('S=',s); end.
Programma asosida eksperimentlar o’tkazamiz. a,b,n=0 1 10 S=0.335
a,b,n=0 1 20 S=0.33375
a,b,n=0 1 100 S=0.33335
a,b,n=0 1 1000 S=0.3333335
Natija to’g’riligi ko’rinib turibdi.


  1. Download 150.65 Kb.

    Do'stlaringiz bilan baham:
1   2   3




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©fayllar.org 2024
ma'muriyatiga murojaat qiling