Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim



Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim


Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim 15 24.01.2019, 13:15

Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim?

İntegralin değerini hesaplamak için,Yaklaşık, yaratıcısı Simpson yöntemi ile adlandırılan mükemmel bir yöntem var. Parabolik yöntem denir, çünkü bir parabolün yapımını kullanır. Bu şekil fonksiyona olabildiğince yakın inşa edilmiştir. Aslında, noktaları fonksiyonun noktaları ile tam olarak çakışan bir parabol oluşturmak mümkün olmadığından, integral yaklaşık olarak geçerlidir. A ve b sınırlarıyla bulunması için formül şu şekildedir: 1 / h * (y0+ 4y1+ 2y2+ 4y3+ ... + 4yN-1+ yn). Burada, her y'yi 0'dan n'e, burada n kendimiz tarafından belirlenir - hesaplarız, o kadar çok, daha iyidir, çünkü daha y-s'ler elde ettiğimiz gerçek değere daha yakındır. H için bu basamak şu formüle göre hesaplanır: (b-a) / (n-1).

simpso örneği

Teorik olarak, her şey oldukça basit, ancak olması gerekirBütün bunları uygulamada gerçekleştirmek. Birçok programcı için, Simpson-Pascal veya Delphi yöntemi gibi bir sorunu çözmenin daha iyi bir yolu yoktur. Bu ortamda, çok basitçe sadece integrali hesaplamakla kalmaz, aynı zamanda bir fonksiyon grafiği ve hatta bunun için yapılmış bir trapezi inşa edebilirsiniz. Böylece, Simpson yöntemini nasıl hızlı bir şekilde uygulayacağımızı bulacağız ve arzu edilirse, herkesin ilgisini çekecek şekilde burada ve nasıl organize edildiğini açıklayacağız.

Ama bundan önce, integralin nasıl göründüğünü hatırlayın. Bu, x ekseni üzerinden başlayan çizgiler, yani a ve b ile sınırlanan bir figür.

simpson yöntemi

Yani, başlamak için, birfonksiyonu (tautoloji için özür dilerim), sadece f: = yazmanız gerekiyor, sonra integralini ne bulacağız. İşlevin Pascal'a girilmesinde hata yapmamak son derece önemlidir. Fakat bu konuşma için ayrı bir konudur. Ortaya çıkan kod şu şekilde görünecektir:

fonksiyon f (x: gerçek): gerçek;

Ve fonksiyonun ana metni

başlamak

f: = 25 * ln (x) + sin (10); {işinizin içeriğini yazmanız gereken yer}

uç uca gelir;

Daha sonra, Simpson yönteminin uygulanması için bir işlev yazıyoruz. Başlangıç ​​böyle bir şey olacak:

simpsonmetod işlevi (a, b: gerçek; n: tamsayı): gerçek;

Ardından, değişkenleri bildirin:

var

s: gerçek; {Ara değerler (daha fazla anlayın)}

h: gerçek; {Aşama}

benim: tamsayı; {Sadece bir sayaç}

mno: tamsayı; {Düzenli çarpanlar}

Ve şimdi, aslında, programın kendisi:

başlamak

h: = (b-a) / (n-1); {Adımı standart formülle hesaplıyoruz. Bazen görevde bir adım yazılır, bu durumda bu formül geçerli değildir}

s: = f (b) + f (a); {Başlangıç ​​adımı değerini ayarlayın}

mno: = 4; {Formülü hatırla - 1 / h * (y0+ 4y1 ...Burada bu 4 yazılmıştır, ikinci çarpan 2 olacak, ama bu daha fazla}

Şimdi temel formül:

benim için: = 1 ila n-2 arasında başlar

s: = s + mno * f (a + h * mu); {Toplamda, bir sonraki faktörü 4 * y ile çarpıyoruz.nveya 2 * yn}

eğer (mno = 4) o zaman mno: = 2 else mno: = 4; {Burada çarpan da değişir - eğer şimdi 4 ise, 2'ye dönüşür ve tersi olur}

uç uca gelir;

simpsonmetod: = s * s / 3; {Sonraki, elde edilen toplam, formüle göre h / 3 ile çarpılır}

sonu.

Hepsi bu - formüle göre tüm eylemleri yapıyoruz. Eğer Simpson yöntemini ana programa nasıl uygulayacağınızı henüz bilmiyorsanız, örnek size yardımcı olacaktır.

Yani yazdığımız tüm fonksiyonları yazdıktan sonra

başlamak

n: = 3; {Set n}

q: = simpsonmetod (a, b, n); {Simpson'un yöntemi, integrali a'dan b'ye hesaplamak olduğundan, birkaç hesaplama adımı olacaktır, bu yüzden döngüyü düzenleriz}

tekrar

q2: = q; {Önceki adım hatırlanır}

n: = n + 2;

q: = simpsonmetod (a, b, n); {Ve sonraki değer hesaplanır}

kadar (abs (q-q2) <0.001); {gerekli hassasiyeti ulaşana kadar, aynı işlemleri tekrarlamak için gerekli olan çok ayar hassasiyeti, yazılır}

simpson pascal yöntemi

İşte böyle - Simpson'ın yöntemi. Aslında, karmaşık bir şey yok, her şey çok hızlı yazılıyor! Şimdi Turbo Pascal'ınızı açın ve programı yazmaya başlayın.

Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim



Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim

Related news

  • İKİ TARAFLI TIĞ İŞİ BEBEK YELEĞİ ÖRÜLÜŞÜ
  • Suşi eve teslim
  • Faber-Castell ile Renkli Sanat Atölyeleri
  • Tırnaklardaki Beyazlıkların Giderilmesi için Öneriler

  • Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim 89

    Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim


    Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim 83

    Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim 68

    Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim 53

    Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim 55

    Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim 20

    Simpson yöntemi nedir ve bunu Pascal dilinde nasıl uygulayabilirim 61