|
Simpson formulasining dasturi Simpson usuli
|
bet | 5/5 | Sana | 14.05.2024 | Hajmi | 0,6 Mb. | | #231581 |
Bog'liq alg mus 17
program Simpson_simpl;
var n,i,k,m:integer; a,b,h,s,s1,s2:real; //n=2m
function f(x:real):real;
begin f:=x*x end;
procedure Simp(a,b:real;n:integer; var s:real); var i:integer; h:real;
begin s:=f(a)+f(b); s1:=0;s2:=0; h:=(b-a)/n; m:=n div 2;
for i:=1 to m-1 do
begin s1:=s1+f(a+(2*i-1)*h); s2:=s2+f(a+(2*i)*h) end; s:=s+4*s1+2*s2;s:=s*h/3; end;
begin
write('a,b,n=?'); readln(a,b,n); h:=(b-a)/n; Simp(a,b,n,s); writeln('S=',s);
end.
Programma asosida eksperimentlar o’tkazamiz.
-
a,b,n=?0
|
1
|
10
|
S=0.225333333333333
|
a,b,n=?0
|
1
|
20
|
S=0.273166666666667
|
a,b,n=?0
|
1
|
40
|
S=0.301645833333333
|
a,b,n=?0
|
1
|
80
|
S=0.317080729166667
|
a,b,n=?0
|
1
|
100
|
S=0.320265333333333
|
a,b,n=?0
|
1
|
200
|
S=0.326733166666667
|
a,b,n=?0
|
1
|
500
|
S=0.330677322666667
|
Natija to’g’riligi ko’rinib turibdi.
Isroilov M.I. “Hisoblash metodlari”: II qism - Т:O’qituvchi, 2008 y. 104-230 bet.
Azlarov T., Mansurov H. Matematik analiz. 2-qism. –T.: O’qituvchi, 1989 y.
Самарский А.А. «Введение в численные методы»: –М: Наука, 1987 г.
Aloev R.D. “Sonli usullar fanidan ma’ruzalar matni”: II qism, Buxoro Davlat Universiteti, 2005 y.
Abduxamidov A., Xudoynazarov S. “Hisoblash metodlari”: -Т: O’zbekiston, 1995 й.
В.Копченова, И.А.Марон. «Вычилительная математика в примерах и задачах»: -М: Наука, 1972 г.
Бахвалов Н.С. «Численные методы»: -М: Наука.1987 г.
Самарский А.А., Гулин А.В. «Численные методы»: –М: Наука. 1989 й.
|
| |