Section courante

A propos

Section administrative du site

SGN

Signe
Visual Basic

Syntaxe

Function SGN(n As Variant) As Integer

Paramètres

Nom Description
n Ce paramètre permet d'indiquer l'expression contenant le nombre à traiter

Retour

Valeur Description
-1 Cette valeur indique un nombre négatif
0 Cette valeur indique un nombre nulle
1 Cette valeur indique un nombre positif

Description

Cette fonction trigonométrique retourne le signe d'un nombre.

Algorithme

MODULE SGN(valeur)
   SI valeur < 0 ALORS
      RETOURNE -1
   SINON SI valeur = 0 ALORS
      RETOURNE 0
   SINON
      RETOURNE 1
   FIN SI

Exemple

Voici un exemple d'une utilisation typique de cette fonction :

  1. Sub Main()
  2.  MsgBox "Sgn(-910) = " & Sgn(-910) & vbCrLf & _
  3.         "Sgn(-1) = " & Sgn(-1) & vbCrLf & _
  4.         "Sgn(0) = " & Sgn(0) & vbCrLf & _
  5.         "Sgn(10) = " & Sgn(10) & vbCrLf & _
  6.         "Sgn(1) = " & Sgn(1) & vbCrLf & _
  7.         "Sgn(100) = " & Sgn(1000)
  8. End Sub

on obtiendra le résultat suivant :

Sgn(-910) = -1
Sgn(-1) = -1
Sgn(0) = 0
Sgn(10) = 1
Sgn(1) = 1
Sgn(100) = 1


Dernière mise à jour : Lundi, le 19 novembre 2012