Mene ne Simpson hanya, da kuma yadda za a aiwatar da shi a cikin harshen Pascal

Don lissafi da darajar da wani integral, albeit m, akwai wani kyakkyawan hanya, mai suna bayan ta mahalicci - Hanyar Simpson. Ya kuma yi kira parabolas hanya, domin shi yana amfani da gina wani parabola. Wannan adadi ne tushen kusa yadda ya kamata zuwa ga aiki. A gaskiya, hanyar da yadda za a gina wani parabola, wanda points daidaita daidai da maki na aiki, ba shi yiwuwa, da kuma na game an approximated. Formula wuri na iyakokinta da kuma b kama da wannan: 1 / h * (y + 4y _{0 1} + 2y ₂ + 4y ₃ + ... + 4y _n-1 + y _n). A nan, mu kawai bukatar yin lissafi kowane y daga 0 to n, inda n mu ayyana kanmu - da more, da mafi alhẽri, saboda mafi y-s, da mafi m ga gaskiya darajar aikin mu. Tare da girmamawa ga h, sa'an nan wannan mataki da aka lasafta ta da wadannan dabara: (Ba) / (n-1).

A ka'idar, duk abin da yake quite sauki, amma ya zama wajibi a yi duk wannan a yi. Domin da yawa masu shirye-shirye ne babu mafi alhẽri hanyar warware wannan matsala, kamar yadda wani Hanyar Simpson - Pascal ko Delphi. A cikin wannan yanayi, shi ne mai sauqi ba ne kawai don kimanta da na game, amma kuma ya gina wani jadawali na aiki da shi, da kuma ko da gina ta trapeze. Saboda haka, za mu dubi yadda za ka iya sauri yi da hanyar da Simpson, kuma ko da ya bayyana, idan so, duka a nan, kuma abin da aka shirya, duk wadanda sha'awar.

Amma na tuna abin da ya kama kafin wannan na game. Wannan adadi, wanda aka daure ta Lines farko tare da 'X' axis, Ina nufin wani kuma b.

Saboda haka, don fara shirin kana bukatar ka ƙirƙiri wani aiki domin integrable ayyuka (afuwa ga tautology), wanda kawai suna rubuta f: = da wani abu ga wanda za mu samu na game. A nan, shi ne muhimmanci ba ɓatar da a shigar da wani aiki a Pascal. Amma yana da wani labarin daban-daban. A sakamakon code zai duba wani abu, kamar wannan:

aiki f (x: real): real.

Kuma ainihin rubutu siffofin

fara

f: = 25 * Ln (x) + zunubi (10); {Nan kuma kana bukatar ka rubuta abinda ke ciki na ta} ayyuka

ƙare.

Sa'an nan rubuta wani aiki don aiwatar da Hanyar Simpson. Fara zai zama wani abu kamar:

aiki simpsonmetod (a, b: real; n: lamba): real.

Next, mun bayyana da canji:

var

s: real. {Subtotals (kara fahimtar)}

h: real. {Mataki}

ta: lamba; Just {counter}

mno: lamba; {} Gaba ninkãwa

Kuma a yanzu, a gaskiya, da shirin da kanta:

fara

h: = (Ba) / (n-1). {Sa ran mataki bisa ga misali dabara. Wani lokaci mataki aka rubuta a cikin aiki, a wannan yanayin, wannan dabara ba tambaya}

s: = f (b) + f (a). {Ganin farko farar darajar}

mno: = 4; {Tuna da dabara - 1 / h * (y + 4y _{0 1 ...} da cewa wannan 4 a nan da kuma tsarin, na biyu factor ne 2, amma mafi a kan wannan daga baya}

Yanzu cewa wannan asali dabara:

don: = 1 zuwa n-2 kada a fara

s: = s + mno * f (a + h * Mu). Don takaice {ƙara wani factor ta tara da 4 * y _n ko 2 * y _n}

idan (mno = 4) sa'an nan mno: = 2 kuma mno: = 4; {Wannan factor dabam da kuma - idan a yanzu shi ne na 4, an canja zuwa 2 da kuma mataimakin versa}

ƙare.

simpsonmetod: = s * h / 3. Next {sake zagayowar sakamakon ware Naira Miliyan Xari da aka yawaita da h / 3} bisa ga dabara

karshen.

Wannan shi - yi duk ayyuka bisa ga dabara. Idan ka ba su siffa fitar da yadda za a yi amfani a cikin babban shirin Hanyar Simpson ta misali taimake ku tare da wannan.

Saboda haka, bayan rubuce duk write ayyuka

fara

n: = 3. Mun kafa {n}

q: = simpsonmetod (a, b, n). {Tun da Simpson hanya ne zuwa lissafta da na game da wani to b, zai zama akwai da dama lissafi matakai, don haka tsara sake zagayowar}

sake

q2: = q. {Haddace gabata mataki}

n: = n + 2;

q: = simpsonmetod (a, b, n). {Kuma} darajar da aka lasafta kamar haka

har (ABS (q-q2) <0.001). {The saitin daidaito da aka rubuta, don haka sai ka isa bukata daidaito, shi wajibi ne don maimaita wannan ayyuka}

Ga wani ya - Simpson Hanyar. A gaskiya, kome wuya, duk abin da aka rubuta sosai da sauri! Yanzu bude your Turbo Pascal da kuma fara rubuta shirin.