Ўзбекистон республикаси олий ва ўрта махсус таълим вазирлиги тошкент кимё – технология институти

Pascal дастурлаш тилида тузилган дастур коди.
Program simpson ;
var a,b,h,s,s1,s2:real;
k,m,n:byte;
function f(x:real):real;
begin f:=... end;
begin
write('a,b интеграллаш чегаралари'); readln( a,b);
write('n='); readln(n);
m:=n*2; h:=(b-a)/m; s:=f(a)+f(b); s1:=0; s2:=0;
for k:=1 to m-1 do s1:=s1+f(a+2*k*h);
for k:=1 to m do s2:=s2+f(a+(2*k-1)*h);
s:=h/3*(s+2*s1+4*s2);
writeln('s=',s);
end.


Симпсон усули алгоритмини блок-схема билан ифодаланиши.




5. Олинган натижалар ва уларнинг таxлили
Ишлаб чиқилган алгоритмларнинг ва яратилган дастурларнинг тўғрилигини текшириб кўриш учун қуйидаги тест мисолида берилган интегрални ҳисоблаймиз:



Интегралнинг аниқ қиймати ёки 5,41(6) га тенг.
Алгоритмни ишлатиш учун интеграллаш чегараларини аниқлаб интеграллаш оралиғини 20 бўлакка бўламиз:
a=0, b=1
n=20
Берилган қийматларни киритиб, юқорида келтирилган алгоритмлар асосида яратилган дастур кодларини компьютерга киритамиз. Қуйидаги натижаларга эга бўламиз:

1) Тўғри тўртбурчак усули билан олинган натижа: s=5,41566723

2) Трапеция усули билан олинган натижа: s=5,4236673
3) Симпсон усули билан олинган натижа: s=5,4166666
Назарий саволлар ва топшириқлар

1. 
   Чап ва унг тўғри тўртбурчаклар формуласини ёзинг.
   
2. 
   Марказий тўғри тўртбурчаклар формуласини ёзинг.
   
3. 
   Трапеция формуласини ёзинг.
   
4. 
   Симпсон формуласини ёзинг.
   

МАЪРУЗА – 14


Интерполяция масалалари. Лагранж интерполяция кўпҳади. Гаусс интерполяция кўпҳади. Алгоритмлар.

Интерполяция масалалари. Интерполяция масаласини қўйилиши.

Гаусс интерполяция формулалари.
Лагранж интерполяция формулалари ёрдамида кўпҳад тузиш.
Алгоритмлар.