» »

bisekcija drugič

bisekcija drugič

rurh46 ::

Imam kodo, katero je napisal moj predhodnik, pri kateri mi ni najbolj všeč, da nekaterih stvari ne kapiram, kaj so.
Napisal bom komentarje, kar vem, če pa bo kdo vedel, kaj še dodat, pa naj pripiše.
Če kdo obvlada bisekcijsko metodo, mi jo lahko razloži, če je tako dober.

begin
D3:=0;// na začetku je nič.
Dmin:=2*R3;//minimalni d je velik 2*R
Dmax:=1E500;//Kaj je 1E500-katera vrednost, kako veš?
while (abs(Dmin-Dmax)>1E-10) do//kaj dela ta zanka?
begin
D3:=(D31+D32)/2;//pač del bisekcije
E31:=(U3*sqrt(sqr((D3)/(2*R3))-1)/(2*R3*((D3)/(2*R3)-1)*ln((D3)/(2*R3)+sqrt(sqr((D3)/(2*R3))-1))));//enačba
if (E31< E3) then// Zakaj to?
Dmax:=D3
else Dmin:=D3;

Upam da vam je kaj jasno. Lepo prosim za odgovore.

mHook ::

1e500 pomeni 1*10^500 (1 in za njo 500 ničel), ravno tako je 1e-10 1*10^-10 (0,0000000001).
Zanka while ponavlja toliko časa, dokler je razlika večja kot 1e-10.
Zadnji if pa nastavi pridobljeno vrednost iz enačbe v Dmin oz. Dmax, odvisno na kateri strani bisekcije se vrednost približuje.

krofko ::

Zgodovina sprememb…

  • spremenil: krofko ()


Vredno ogleda ...

TemaSporočilaOglediZadnje sporočilo
TemaSporočilaOglediZadnje sporočilo
»

Baza v vektorskem prostoru

Oddelek: Šola
182627 (1125) BivšiUser2
»

matematika, geometrije v ravnini, telesa

Oddelek: Šola
203267 (2636) manniac
»

matematični nalogi

Oddelek: Šola
172620 (2344) 2loud4u
»

Silavzgona/lebdenje

Oddelek: Šola
111961 (1830) *ziga*
»

[delphi] problem : Bisekcijska metoda

Oddelek: Programiranje
201359 (1240) ru7

Več podobnih tem