Racine carré. -- Nombre entier ou non?

Question

Salut, voila mon problème :
Je fais une opération avec un exposant 0.5 (Soit l'équivalent d'une racine carré)
Je voudrais savoir comment faire pour vérifier si le résultat de cette opération est un nombre entier ou non.

Exemple :
4^0.5 = 2 --> 2 est un nombre entier, on le laisse tel quel
5^0.5 = 2.236... Ce n'est pas un nombre entier, je veux qu'il soit dans une textbox sous la forme V5 (Racine carré de 5)

Voila !

Merci.

cs_fuck · Answer

Voila :

je crois que c'est ca que tu veux :

Cette fonction regarde si une racinne carré d'un nombre tombe pille poil:

ex:

4^0.5=2


Function RacinePile(Nombre As Long) As BooleanIf Sqr(Nombre) <> Fix(Sqr(Nombre)) Then RacinePile False Else RacinePile True
End Function


Pour l'utiliser tu fais ceci :


If RacinePile(Text1.Text) = True Then msgbox "C'est pille" ' Text1 eatnt le nombre a calculer (ex : 3 ,47,5) ' si c'est true c'est pile


Voila

z980x · Answer

Merci mister !

Ca marche sans problème !

Racine carré. --> Nombre entier ou non?

2 réponses

Discussions similaires