Ketma-ketliklar, to‘plamlar, daraxtlar, graflarni ifodalash usullari

writeln(‘integral kiymati J=’,J:3:4);

end.

{Simpson usuli} Program integral2(input,output); Uses crt; var a,b,h,s,J:real; i,n,k:integer; function f(x:real):real; begin f:=ln(x*x+3*x+1); end; begin clrscr; write(‘quyi chegara a=’); readln(a); write(‘yuqori chegara b=’); readln(b); write(‘bo’laqlar soni n=’); readln(n); h:=(b-a)/n; s:=f(a)+f(b); k:=1; for i:=2 to n do begin s:=s+(3+k)*f(a+(i-1)*h); k=-k end; J:=s*h/3; textcolor(2); writeln(‘integral qiymati J=’,J:3:4); end.

Ushbu dasturlarni zamonaviy IBM va Pentiem kompyuterlarining Turbo Pascal tizimiga kiritib natijalarni olish va taxlil qilish mumkin.
Algebraik va trantsendent tenglamalarni taqribiy yechish usullari, kesmani ikkiga bulish usuli
Algebraik va trantsendent tenglamalar ildizlari yotadigan oraliklar ajratib olingandan sung tenglamaning ildizini taqribiy hisoblash uchun, taqribiy hisoblash usullaridan biri kullaniladi.
Demak tenglama berilgandan sung, tenglamaning ildizlari yotgan oraliklar ajratib olinadi, taqribiy ildizni topish usuli tanlanadi, tanlangan usulga mos ravishda algorimning blok–sxemasi va biror bir dasturlashtirish tilida blok–sxemaga mos ravishda dastur tuziladi. Dastur kompyuterga terilib, natijalar olinadi va taxlil kilinadi.
Tenglamalarning ildizlarini taqribiy yechish usullaridan biri bu kesmani teng ikkiga bulish usulidir. Bunda berilgan [a;b] kesma teng ikkiga bulinib [a;с] yoki [с;b] kesmalarda f(a)∙f(c)<0 yoki f(c)∙f(b)<0 shart tekshiriladi va с=(a+b)/2 qilib olinadi va ildiz b-a≤ε shart bajarulgunga kadar davom etirilib topiladi.