Forum » Programiranje » 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.
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.
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.
Vredno ogleda ...
Tema | Ogledi | Zadnje sporočilo | |
---|---|---|---|
Tema | Ogledi | Zadnje sporočilo | |
» | Baza v vektorskem prostoruOddelek: Šola | 2627 (1125) | BivšiUser2 |
» | matematika, geometrije v ravnini, telesaOddelek: Šola | 3267 (2636) | manniac |
» | matematični nalogiOddelek: Šola | 2620 (2344) | 2loud4u |
» | Silavzgona/lebdenjeOddelek: Šola | 1961 (1830) | *ziga* |
» | [delphi] problem : Bisekcijska metodaOddelek: Programiranje | 1359 (1240) | ru7 |