cs_dragon
Messages postés2336Date d'inscriptionsamedi 14 juillet 2001StatutMembreDernière intervention 5 mai 2009
-
31 mai 2004 à 22:53
bigbourin
Messages postés64Date d'inscriptionlundi 12 avril 2004StatutMembreDernière intervention18 août 2006
-
2 juin 2004 à 13:33
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
bigbourin
Messages postés64Date d'inscriptionlundi 12 avril 2004StatutMembreDernière intervention18 août 2006 2 juin 2004 à 13:33
au fait, Merci a tous pour les conseilles et pour repondre a docteur vb, je connais ta commade mais sa ne fait que des recines carré.
ciao
bigbourin
Messages postés64Date d'inscriptionlundi 12 avril 2004StatutMembreDernière intervention18 août 2006 2 juin 2004 à 13:31
bon maintenant que j'y apris un truck je pense que je vais supprimer cette source sans interet
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 2 juin 2004 à 12:33
tu portes bien ton pseudo ;) Je suis partisan de la réinvention perpetuelle de la roue... mais une fonction toute faite existe.... avec un peu de code comme il t'est proposé plus haut....
Vb Lover
Messages postés221Date d'inscriptionvendredi 30 novembre 2001StatutMembreDernière intervention13 février 20105 1 juin 2004 à 20:36
Et moi, quand le nombre est négatif, je ne m'arrête pas !
Si l'exposant est pair et que vous n'avez pas envie de faire appel aux imaginaires, c'est ok pour moi.
Mais si vous cherchez la racine cubique de -1, ba moi je dis que c'est -1 !!
Sinon dans le code, j'initialiserais le "a" avant de faire ma boucle. Qqch me dit que si on relance le code, ça plante...
DocteurVB
Messages postés211Date d'inscriptionlundi 19 août 2002StatutMembreDernière intervention20 mai 2005 1 juin 2004 à 19:10
moi perso je fais :
dim nb as integer
dim RacNb as varriant
if nb>0 then
RacNb=sqr(nb)
end if
sur ce bon coding (et bonne prise de tête...)
DocteurVB
vlad2i
Messages postés285Date d'inscriptionmercredi 20 août 2003StatutMembreDernière intervention13 février 2005 1 juin 2004 à 15:40
Voui d'ailleurs, entre autres, ta fonction se limite aux nombres gérés par VB (14 décimales je crois)...
Avec le binôme de Newton tu peux en avoir bien plus rapidement une centaine ou plus...
Quoi que l'idée est sympa d'essayer (racine niène de x = x^(1/n))
Landhar
Messages postés2Date d'inscriptiondimanche 2 février 2003StatutMembreDernière intervention 4 juin 2004 1 juin 2004 à 00:59
C'est vrai que tu t'es cassé la tête pour pas grand chose
cs_dragon
Messages postés2336Date d'inscriptionsamedi 14 juillet 2001StatutMembreDernière intervention 5 mai 20096 31 mai 2004 à 22:54
oups le o c,est 1/2
cs_dragon
Messages postés2336Date d'inscriptionsamedi 14 juillet 2001StatutMembreDernière intervention 5 mai 20096 31 mai 2004 à 22:53
tu t'es cassé la tête en maudit, une racine c'est 1 sur exposant.
2 juin 2004 à 13:33
ciao
2 juin 2004 à 13:31
2 juin 2004 à 12:33
1 juin 2004 à 20:36
Si l'exposant est pair et que vous n'avez pas envie de faire appel aux imaginaires, c'est ok pour moi.
Mais si vous cherchez la racine cubique de -1, ba moi je dis que c'est -1 !!
Sinon dans le code, j'initialiserais le "a" avant de faire ma boucle. Qqch me dit que si on relance le code, ça plante...
1 juin 2004 à 19:10
dim nb as integer
dim RacNb as varriant
if nb>0 then
RacNb=sqr(nb)
end if
sur ce bon coding (et bonne prise de tête...)
DocteurVB
1 juin 2004 à 15:40
Avec le binôme de Newton tu peux en avoir bien plus rapidement une centaine ou plus...
Quoi que l'idée est sympa d'essayer (racine niène de x = x^(1/n))
1 juin 2004 à 00:59
31 mai 2004 à 22:54
31 mai 2004 à 22:53
exemple racine carré de 3, ça sera 3^o