Site:

Cours VB.net

1.19.3

Contrôle des connaissances. Variables numériques.

Questions:

3- Variables numériques.

3.1 Créer une variable 'i'  de type Integer, initialiser la avec la valeur 2, Incrémenter i  (ajouter 1).

3.2 Créer une variable 's'  de type virgule flottante simple précision, initialiser la avec la valeur 12,7561 , créer une  variable 's1' qui devra contenir la partie entière de 's'  créer une  variable s2 qui devra contenir 's' arrondi à 2 décimales après la virgule (Comme pour les valeurs monétaires). Que contiendra s1 et s2 à la fin?

3.3 Créer un nombre virgule flottante double précision nommé 'x', l'initialiser avec 123456,45. Calculer le cube de x  (x puissance 3), la racine 4ieme de x :

Réponses:

3- Variables numériques.

3.1 Créer une variable 'i'  de type Integer, initialiser la avec la valeur 2, Incrémentez i (ajouter 1).

Dim i As Integer=2

i=i+1

ou i += 1

3.2 Créer une variable 's'  de type virgule flottante simple précision, initialiser la avec la valeur 12,7561 , créer une  variable 's1' qui devra contenir la partie entière de 's'  créer une  variable s2 qui devra contenir 's' arrondi à 2 décimales après la virgule (Comme pour les valeurs monétaires). Que contiendra s1 et s2 à la fin?

Dim s As Single

Dim s1 As Single

Dim s2 As Single

 s =12.7561 

s1 =Math.Truncate(s)  

s2 =Math.Round(s, 2) 

s1 sera égal à 12.    (partie entière)

s2 sera égal à 12.76 (arrondi à l'entier le plus proche)

On remarque qu'on a déclaré toutes les variables au début (c'est une bonne manière de faire), plutôt qu'au moment ou on en a besoin.

On a bien écrit s =12.4561  et pas s =12,4561 car le séparateur décimal est le point. 

Au lieu d'écrire s1 =Math.Truncate(s), on écrit souvent s1 =Int(s)  en utilisant une instruction Visual Basic. 

Question : pourquoi Math. avant Truncate? C'est pour indiquer l'espace de nom System.Math qui contient Trunccate; on aurait pu aussi écrire en tête de module Imports System.Math et ensuite s1 =Truncate(s) aurait été accepté.  

3.3 Créer un nombre virgule flottante double précision nommé 'x', l'initialiser avec 123456,45. Calculer le cube de x  (x puissance 3), la racine 4ieme de x :

Dim x As Double

Dim x1 As Double

Dim x2 As Double

 x =123456.45

x1= Math.Pow(x, 3)

x2= Math.Pow(X, 1/4)