Који је метод Симпсон, и како га имплементирати на језику Пасцал

Да би се израчунао вриједност саставни, иако приближна, постоји одлична метода, названа по свом творцу - начин Симпсон. Он је такође позвао параболе методом, јер користи изградњу параболе. Ова цифра је заснована што је ближе могуће функције. У ствари, начин како да се изгради параболе, што указује подударају управо са тачке функције, то је немогуће, а саставни је проценити. Формула локација његових граница са а и б изгледа овако: 1 / х * (и + 4и _{0 1} + 2и ₂ + 4и ₃ + ... + 4и _н-1 + и _н). Овде, само треба да се израчуна сваки и од 0 до н, где је н смо се дефинишу - више, то боље, јер је више И-С, више приближан праве вредности нашег рада. Што се тиче часова, а онда овај корак се рачуна према следећој формули: (ба) / (н-1).

У теорији, све је прилично једноставно, али било би неопходно да спроведе све ово у пракси. За многе програмере постоји бољи начин да се реши овај проблем, као метод Симпсон - Пасцал или Делпхи. У таквом окружењу, врло је лако не само за процену саставни, али и да гради график функције на њу, па чак и градила своју трапезу. Дакле, гледамо како се брзо може имплементирати метод Симпсон, па чак и да објасни, ако је потребно, и овде и да се организује, све заинтересоване.

Али сећам се како то изгледа пре тога саставни. Ова бројка, која је ограничена линијама које почињу са 'к' осе, т.ј. и б.

Дакле, да покренете програм треба да направите функцију за интеграбилних функција (извините на таутологију), који једноставно морају да пишу Ф: = и нешто за шта ћемо наћи интегрални. Ево, од кључног је значаја да се не грешити у улазак у функцију у Пасцал. Али то је друга прича. Добијени број ће изгледати отприлике овако:

функција ф (к реал): прави;

А основни текст карактеристике

почети

ф: = 25 * лн (к) + син (10); {Овде и морате да напишете садржај својих функција}

енд;

Затим написати функцију за примену метода Симпсон. Почетак ће бити нешто попут:

фунцтион симпсонметод (а, б: реал; н: интегер): реал;

Следеће, изјављујемо променљиве:

вар

и: Реал; {Субтоталс (даљем разуме)}

Х: Реал; {Степ}

мој: Интегер; Само {бројач}

мно: интегер; {} Сљедежи мултипликатори

А сада, у ствари, сам програм:

почети

х: = (ба) / (н-1); {Очекујте корак према стандардној формули. Понекад корак је написано у послу, у овом случају, ова формула не важи}

с: = ф (б) + ф (а); {Обзиром почетна питцх валуе}

мно: = 4; {Запамтите формулу - 1 / х * (и + 4и _{0 1 ...} да је овај 4 овдје и пира, други фактор је 2, али више о томе касније}

Сада ту исту основну формулу:

за мој: = 1 то н-2 до бегин

с: = с + мно * ф (а + х * Му); Да сумира {додали другу фактор помножен 4 * и _н ор 2 * и _н}

иф (мно = 4) тада мно: = 2 елсе мно: = 4; {Овај фактор варира и - уколико сада је 4, се мења у 2 и обрнуто}

енд;

симпсонметод: = с * х / 3; Нект {циклус Добијена сума помножи х / 3} према формули

крај.

То је то - изврши све радње према формули. Ако нисте схватили како да се пријаве у главном програму метода Симпсон пример ти помогнем.

Дакле, после писања све написати функције

почети

н: = 3; Ве сет {н}

к: = симпсонметод (а, б, н); {Пошто је метод Симпсон је израчунати интеграл а то б, биће неколико корака прорачуна, па организовати циклус}

понављање

к2: = к; {Меморизед претходни корак}

н: = н + 2;

к: = симпсонметод (а, б, н); {И} вредност је израчуната на следећи начин

до (АБС (К-К2) <0.001); {тачност Поставка је написано, тако да док не достигне жељену тачност, неопходно је да се понови исте радње}

Овде је он - метод Симпсона. У ствари, ништа компликовано, све је написано врло брзо! Сада отворите Турбо Пасцал и почети писати програм.