Racine carré [Résolu]
cs_a_zouggari
28
Messages postés
mercredi 14 juin 2006Date d'inscription
4 mai 2008
Dernière intervention
-
23 mai 2007 à 10:11 - Dernière réponse : meite
- 21 févr. 2017 à 08:41
- Racine carré
- Racine carrée par la méthode de newton » Codes sources - Visual Basic / VB.NET (Maths)
- Très rapidement la racine carrée » Codes sources - Visual Basic / VB.NET (Maths)
- Racine carrée (ajout aux fonctions précédentes) » Codes sources - Visual Basic / VB.NET (Maths)
- Racine carrée » Codes sources - Javascript (Divers)
- Extraction d'une racine carrée » Codes sources - C / C++ / C++.NET (Maths & Algorithmes)
17 réponses
Meilleure réponse
Salut,
Et MsgBox(Math.Sqrt(25))
@+: Ju£i?n
Pensez: Réponse acceptée
Et MsgBox(Math.Sqrt(25))
@+: Ju£i?n
Pensez: Réponse acceptée
Avec quelques mots c'est encore mieux Ajouter un commentaire
a aidé 93 internautes ce mois-ci
Vous êtes ici :
Thèmes / VB.NET et VB 2005 / Algorithme / Maths / racine carré
Drikce 06
Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:
Thèmes / VB.NET et VB 2005 / Algorithme / Maths / racine carré
Drikce 06
Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:
Salut,
Tu n'as JAMAIS preciser que tu étais en macro VBA....
Tu vois l'importance de poster ta question dans la section appropriée... Tu gagnes du temps et tu evites de nous en faire perdre. pas mal non?
Tu peut essayer
MSgbox Sqr(25)
ou bien en Fonction Excel pour une cellule =RACINE(25)
@+: Ju£i?n
Pensez: Réponse acceptée
Tu n'as JAMAIS preciser que tu étais en macro VBA....
Tu vois l'importance de poster ta question dans la section appropriée... Tu gagnes du temps et tu evites de nous en faire perdre. pas mal non?
Tu peut essayer
MSgbox Sqr(25)
ou bien en Fonction Excel pour une cellule =RACINE(25)
@+: Ju£i?n
Pensez: Réponse acceptée
Ah ...
Jed vois qu'on s'amuse, ici...
A mon tour de compliquer les choses, alors (et comme çà, on apprends à aller plus loin qu'à la racine carrée) :
Private Sub Command1_Click()
Dim toto As Double, racine As Integer
toto = 2
racine = 5
MsgBox aufou(toto, racine)
End Sub
Private Function aufou(nb As Double, rac As Integer) As Double
aufou = Exp(Log(nb) / rac)
End Function
Jed vois qu'on s'amuse, ici...
A mon tour de compliquer les choses, alors (et comme çà, on apprends à aller plus loin qu'à la racine carrée) :
Private Sub Command1_Click()
Dim toto As Double, racine As Integer
toto = 2
racine = 5
MsgBox aufou(toto, racine)
End Sub
Private Function aufou(nb As Double, rac As Integer) As Double
aufou = Exp(Log(nb) / rac)
End Function
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.