Ipologismos Rizas

[Dvs]

Exei kaneis tin sinartisi pou na kataskeuazei tin riza?

[Winner]

an enoeis stin Visual Basic tote i entoli einai:<BR>SQR(NUMBER)<BR>px. SQR(4) = 2<P>elpizo na boithisa...

[sh4dow]

<A HREF="http://www.insomnia.gr/cpubb/Forum8/HTML/000015.html" TARGET=_blank>http://www.insomnia.gr/cpubb/Forum8/HTML/000015.html</A>

[Dvs]

Winner: To xero ori einai sqr! Ton kodika thelo!<P>sh4dow: thimamai oti eixa xanarotisei alla eixa dei tin apantisi ( mallon exaitias ton temporary arxeion). <BR>thx<p>[This message has been edited by Dvs (edited 13-02-2001).]

[sh4dow]

na kai o kodikas gia min psaxneis.<P>Dim a, b, c As Double<BR>a=Text1.Text<BR>b=2<BR>For i=1 To 500<BR>c=a/b<BR>b=(b+c)/2<BR>Next<BR>Text2.Text=b

[WizeMan]

episis i riza tou 4 einai kai to 4^0.5 (stin dinami tou 0.5)

[Theoxaris]

H synartisi se glwssa C yparxei etoimi stin

math.h kai einai i pow(ekthetis,dynami).

An pali theleis ton algorithmo einai o eksis :

 

_____________________________________

int power(int base,int n)

{

int i,p;

p=1;

for(i=1;i<=n;++i)

p=p*base;

return p;

}

______________________________________

 

------------------------

Elpizw na boithisa !!!

 

<small>[ 26-04-2002, 01:14: Το μήνυμα επεξεργάστηκε από: Theoxaris ]</small>

[Γηρυόνης]

</font><blockquote><font size="1" face="Verdana, Helvetica, sans-serif">quote:</font><hr /><font size="2" face="Verdana, Helvetica, sans-serif">Originally posted by Theoxaris:

<strong>H synartisi se glwssa C yparxei etoimi stin

math.h kai einai i pow(ekthetis,dynami).

An pali theleis ton algorithmo einai o eksis :

 

_____________________________________

int power(int base,int n)

{

int i,p;

p=1;

for(i=1;i<=n;++i)

p=p*base;

return p;

}

______________________________________

 

------------------------

Elpizw na boithisa !!!</strong></font><hr /></blockquote><font size="2" face="Verdana, Helvetica, sans-serif">Ayto einai h synarthsh ths rizas h h me8odos poy mas dinei enan ari8mo elksypswmeno se mia dynamh;

[HdkiLLeR]

Loipon sxetika me ton ipologismo tis tetragwnikis rizas borei na xrisimopoiithei mia epanaliptiki methodos twn Newton-Raphson opou simfona me tin opoia ean E einai mia prosegisi tis tetragwnikis rizas toy x tote mia kaliteri prosegisi einai i (E+x/E)/2.Opote boreis na dwseis arxiki timi 1 stin E kai na tin adikathistas me tis kaliteres prosegiseis apo ton tipo,stamatodas otan px dio diadoxikes prosegiseis diaferoun kata to tetarto simadiko psifio i kata to pebto,ekto klp analoga me tin akriveia poy thes.Se Java auto borei na ginei ws ekxis:

</font><blockquote><font size="1" face="Verdana, Helvetica, sans-serif">code:</font><hr /><pre style="font-size:x-small; font-family: monospace;">

float tetragwniki(float x)

{

final epsilon=0.0001; //akriveia 4 psifiwn

float x0,xN;

if (x<0)

{

System.out.println("No negative sqrt");

System.exit(1);

}

else

{

xN=1;

do

{

x0=xN;

xN=(x0+x/x0)*0.5 //kaliteri prosegisi

}

while(Math.abs(xN-x0)>epsilon);

return xN;

}

}[/code]</blockquote><font size="2" face="Verdana, Helvetica, sans-serif">Tora ean thes kai gia c++ borw na sto sto grapsw alla pisteuw katalaves ti pezei.Auta kai pisteuw na voithisa <img border="0" title="" alt="[Wink]" src="images/icons/wink.gif" />

[Dvs]

pou to vrikes? to eixa valei 11-02-2001 <img border="0" title="" alt="[smile]" src="images/icons/smile.gif" />

to kaname proto examino me tin methodo pou eipes

[HdkiLLeR]

Wx nai den to ksethapsa egw apla eida to post-reply toy girioni kai apadisa <img border="0" title="" alt="[Wink]" src="images/icons/wink.gif" />

[Dvs]

o WizeMan to xethapse <img border="0" title="" alt="[smile]" src="images/icons/smile.gif" />