Nedir yöntem, Simpson ve uygulamak onun dilinde Pascal

Tarihli:

2018-10-02 17:10:12

Görünümler:

549

Verim:

1İstemek 0Sevmeme

Pay:

Table of contents:

Değerini hesaplamak İçin integral rağmen, yaklaşık, orada güzel bir yöntem, adını yaratıcısı, – Simpson yöntemi. O da, denilen, bir şekilde парабол, çünkü onu oluşturmak için kullanılan bir parabol. Bu rakam inşa imkanlar приближенно fonksiyonu. Aslında, inşa parabol olan noktaları tam olarak aynı noktaları ile imkansız özellikler, integral ve приближенно. Formülü bulunduğu yer ile sınırları a ve b gibi görünüyor: 1/h*(y0+4y1+2y2+4y3+…+4yN-1+yN). Burada bize sadece hesaplamak için her y 0 n, n belirleriz kendilerini – daha fazla, daha iyi, çünkü daha fazla y-ler, daha yaklaşık bir gerçek var değeri çıkacaktır. Gelince, h, o zaman bu adım ve hesaplanan bu formül: (b-a)/(n-1).

yöntemi, simpson örnek

Teorik olarak, her şey oldukça basit, ama hayata her şey bu uygulamada. Birçok programcılar için daha iyi bir yolu böyle bir sorunu çözmek, bir yöntem olarak Kullanıl – Pascal veya Delphi. Bu ortamda, çok değil sadece hesaplamak için sadece integral ve inşa etmek ve o'na grafik fonksiyonları ve hatta выстроенную ona трапецию. Yani, bu işi mümkün olduğunca hızlı bir şekilde uygulanması yöntemi, Simpson ve isterseniz, hatta kendisi için nasıl açıklamak için burada ve organize, tüm ilgilenen.

Ama bunu yapmadan önce, geri çağırma gibi görünüyor integral. Bu rakam, bir hat ile sınırlıdır başlayan eksen иксов, yani a ve b,.

yöntemi, simpson

Peki, başlamak için bir program oluşturmak için bir işlevi интегрируемой özellikleri (pardon bir totoloji), hangi sadece yazmak f:= ve o zaman, neden biz bulmak için integral. Burada son derece önemli bir hata girişi işlevleri dilinde Pascal. Ama bu ayrı bir konu. Çıkan kodu aşağıdaki gibi görünür:

Daha:

Lenovo v580c: ayrıntılı bir inceleme

Lenovo v580c: ayrıntılı bir inceleme

Bugün karar hakkında yazmak için bir dizüstü Lenovo v580c. İnceleme ayrıntılı olarak bu taşınabilir PC serisi Ideapad yüksek popülerlik, ama çok değil biliyorum, ne çekiyor bu cihaz alıcı. Model, hızlı ve kendi içinde çok olumlu özellikleri de vardır...

İstiyorsanız, taklit disk görüntü? Program Alcohol %120 - en iyi çözüm!

İstiyorsanız, taklit disk görüntü? Program Alcohol %120 - en iyi çözüm!

Birçok profesyonel PC kullanıcıları farkındayız son derece kaliteli ve işlevsel bir program görüntüleri ile çalışmak. Alcohol 120% - bu muhteşem programı bilen yaratmak için değil, sadece «hayaletler» en farklı disk türleri için yola çıka...

Screen: bu nedir ve nasıl oluşturmak için

Screen: bu nedir ve nasıl oluşturmak için

Birkaç kullanıcılar nasıl biliyor sreen, nedir ve ne için kullanılır? Altında veri kavramı ima anlık ekran. Tabii ki, önce öğrenmek, onu almak için nasıl anlamak gerekir, ne için genellikle gereklidir, ve şimdi biz bu konuda konuşmak.Sreen: nedir ve ...

Function f(x:real):real;

Temel metin fonksiyonları

Begin

F:=25*ln(x)+sin(10); {burada yazmak zorunda içeriğini kendi señim}

End;

Daha yazalım özelliğini uygulamak için Simpson yöntemi. Başlangıcı yaklaşık böyle:

Function simpsonmetod(a,b:real;n:ınteger):real;

Daha sonra açıklayacak değişkenler:

Var

S:real; { Ara toplamı (ileri fark) }

H:real; { bir Adım }

< my:integer; { Sadece sayaç }

Mno:integer; { Sonraki çarpanları }

şimdi, aslında, kendisi bir program:

Begin

H:=(b-a)/(n-1); { Güveniyor adım standart bir formül. Bazen işteki yazıldığından adım, bu durumda bu formül için geçerli değildir }

S:= f(b)+ f(a); { Ayarlanır başlangıç değeri adım }

Mno:=4; { Hatırlayın formül - 1/h*(y0+4y1… işte bu 4 burada yazılır, ikinci çarpanı 2 olacak, ama bu konuda daha }

Şimdi ta en temel formül:

For my:=1 to n-2 do begin

S:=s+mno*f(a+h*mu); { toplam ekliyoruz başka bir çarpan ile çarpılır 4*yN veya 2* yN }

If (mno=4) then mno:=2 else mno:=4;{ Burada değişiyor çarpanı - şimdi ise eşittir 4, değişiyor, 2 ve tersi}

End;

Simpsonmetod:=s*h/3; { Sonraki ortaya çıkan döngü miktarı множим h/3 göre formül}

End.

İşte – yaptığımız tüm eylemleri formüle göre. Eğer hala anlamış değil, uygulamak için nasıl bir temel program yöntemi, Simpson, örnek, size bu konuda yardımcı olacaktır.

Yani yazdıktan sonra tüm fonksiyonlar yazmak

Begin

N:=3; { Soruyoruz n }

S:=simpsonmetod(a,b,n); { Yani nasıl bir yöntem Simpson etmektir hesaplamak için integral a-b, bir kaç adım hesaplamak, böylece yeni bir döngü }

Repeat

S2:=s; { Hatırlanır önceki adım }

N:=n+2;

S:=simpsonmetod(a,b,n); { hesaplanır Ve aşağıdaki değeri }

Until (abs(q-q2)<0.001);{ işteki yazılır hassas, bu yüzden bu kadar edilemeyebilir gerekli hassasiyeti, gerek tekrar tekrar aynı eylemleri }

yöntemi, simpson pascal

İşte o – Simpson yöntemi. Aslında karmaşık bir şey yok, büyü tüm çok hızlı bir şekilde! Şimdi açın kendi Turbo Pascal ve yazmaya başlayın programı.


Article in other languages:

AR: https://tostpost.com/ar/computers/6896-what-is-the-simpson-method-and-how-to-implement-it-in-pascal.html

BE: https://tostpost.com/be/kamputary/12329-u-chym-zaklyuchaecca-metad-s-mpsana-yak-real-zavac-yago-na-move-paskal.html

DE: https://tostpost.com/de/computer/12331-was-ist-die-simpson-methode-und-implementieren-es-in-der-sprache-pasca.html

En: https://tostpost.com/computers/2119-what-is-the-simpson-method-and-how-to-implement-it-in-pascal.html

ES: https://tostpost.com/es/los-ordenadores/12339-en-que-consiste-el-m-todo-de-simpson-y-c-mo-implementar-en-pascal.html

HI: https://tostpost.com/hi/computers/6902-what-is-the-simpson-method-and-how-to-implement-it-in-pascal.html

JA: https://tostpost.com/ja/computers/6900-what-is-the-simpson-method-and-how-to-implement-it-in-pascal.html

KK: https://tostpost.com/kk/komp-yuterler/12332-nede-d-s-simpson-zh-ne-ony-paskal.html

PL: https://tostpost.com/pl/komputery/12325-na-czym-polega-metoda-simpsona-i-jak-wdro-y-go-w-j-zyku-pascal.html

PT: https://tostpost.com/pt/computadores/12320-em-que-consiste-o-m-todo-de-simpson-e-como-implement--lo-em-linguagem-.html

UK: https://tostpost.com/uk/komp-yuteri/12332-u-chomu-polyaga-metod-s-mpsona-yak-real-zuvati-yogo-na-mov-paskal.html

ZH: https://tostpost.com/zh/computers/7476-pascal.html






Alin Trodden - makalenin yazarı, editör
"Merhaba, ben Alin Trodden. Metin, kitap okumak, yazmak ve Gösterimler için bak. Ve sana söylüyorum.kötü değilim. İlginç projelere katılmaktan her zaman mutluluk duyarım."

Yorumlar (0)

Bu makalede Yorum yok, ilk olmak!

Yorum ekle

İlgili Haberler

Oyun Portal: geçen ikinci bölümü

Oyun Portal: geçen ikinci bölümü

başlangıçta, oyun, Portal gibi görünüyor kafa karıştırıcı. İlk izlenim oluyor çok bulanık. Öncelikle göz ve dinlemek ona göre yapay zeka, kontrol sistemi. Öğrenme moduna geçmek turuncu halka duvarda. Bu portal, şimdi bunları öğren...

Oyun hileleri

Oyun hileleri "düşman hatlarının gerisinde 2: Fırtınası"

birçok stratejiler vardır yazmak için yeteneği hile kodları büyük ölçüde kolay bir oyun. Onlar çok farklı ve teklif size çok çeşitli özellikleri, hangi olabilir daha önce sadece hayal ile başlayan küçük bir zam için kaynak daha, b...

Bilgisayarınızın hızını miktarına bağlıdır işlenen bilgi

Bilgisayarınızın hızını miktarına bağlıdır işlenen bilgi

Bilgisayar için çok oldu günlük yaşamın ayrılmaz bir parçası. Bazı görmek o araç için uygun, diğerleri ile kazanmak. Ve ilk ve ikinci çok önemli bir performans göstergesi. Bilgisayarın çalışma hızı birçok faktöre bağlıdır ve kural...

Nasıl скрафтить зельеварку

Nasıl скрафтить зельеварку "Майнкрафте": deyim

en önemli yönlerinden biri "Майнкрафта" iksir oluşturma. Oyunun kendisi zaten uzun zaman oldu bir kült evren doğuran birçok klonlar ve kullanıcılar için tercih, ya da meşgul yaratıcılık, ya da geçmek, hikaye kartı. Ama eğer bir oy...

Nasıl kitapçık Publisher? Oluşturma ve açıklama

Nasıl kitapçık Publisher? Oluşturma ve açıklama

Basım kitapçığı — bu etkili bir şekilde sunulması hakkında bilgi ürün, firma ya da. Bunları oluşturmak için de uygun bir program Microsoft Publisher. Usta zor değil. Daha sonra makalede, biz-ecek vermek deyimi nasıl kitapçık...

Ne криптовалюту şimdi karlı майнить bilgisayarda?

Ne криптовалюту şimdi karlı майнить bilgisayarda?

Şimdi dünyada gözlenen gerçek криптовалютный patlama. Sonra bitcoin rekor kırdı maliyet dünya borsası, keskin istedik onu майнить. Ancak bu o kadar kolay değil. Mesele şu ki, bu криптовалютой ilgilenen dünya corporation ("Microsof...