On vous propose quelques exercices pour pratiquer l’utilisation de la structure de contrôle For...Next en VB.NET :
Exercice 1: Affichage de Nombres
Écrivez un programme qui utilise une boucle For...Next pour afficher les nombres de 1 à 10 sur la console.
For i As Integer = 1 To 10
Console.WriteLine(i)
Next
Exercice 2: Somme des Nombres Pairs
Écrivez un programme qui utilise une boucle For...Next pour calculer la somme des nombres pairs de 1 à 50 et affichez le résultat.
Dim somme As Integer = 0
For i As Integer = 2 To 50 Step 2
somme += i
Next
Console.WriteLine("La somme des nombres pairs de 1 à 50 est : " & somme)
Exercice 3: Table de Multiplication
Écrivez un programme qui utilise une boucle For...Next pour afficher la table de multiplication d’un nombre spécifié par l’utilisateur. Demandez à l’utilisateur d’entrer un nombre, puis affichez la table de multiplication de ce nombre de 1 à 10.
Console.Write("Entrez un nombre : ")
Dim nombre As Integer = Integer.Parse(Console.ReadLine())
For i As Integer = 1 To 10
Console.WriteLine(nombre & " x " & i & " = " & (nombre * i))
Next
Exercice 4: Calcul de la Factorielle
Écrivez un programme qui demande à l’utilisateur d’entrer un nombre et utilise une boucle For...Next pour calculer la factorielle de ce nombre. La factorielle de n (notée n!) est le produit de tous les entiers de 1 à n.
Console.Write("Entrez un nombre : ")
Dim nombre As Integer = Integer.Parse(Console.ReadLine())
Dim factorielle As Integer = 1
For i As Integer = 1 To nombre
factorielle *= i
Next
Console.WriteLine("La factorielle de " & nombre & " est : " & factorielle)
Exercice 5: Carrés et Cubes
Écrivez un programme qui utilise une boucle For...Next pour afficher les carrés et les cubes des nombres de 1 à 10. Pour chaque nombre, affichez à la fois son carré et son cube.
For i As Integer = 1 To 10
Console.WriteLine("Nombre : " & i & ", Carré : " & i ^ 2 & ", Cube : " & i ^ 3)
Next
Exercice 6: Motif Triangulaire
Écrivez un programme qui utilise une boucle For...Next pour afficher un motif triangulaire sur la console. Le motif devrait ressembler à ceci :
*
**
***
****
*****For i As Integer = 1 To 5
For j As Integer = 1 To i
Console.Write("*")
Next
Console.WriteLine()
Next
Exercice 7: Inversion de Mot
Écrivez un programme qui demande à l’utilisateur d’entrer un mot et utilise une boucle For...Next pour afficher le mot à l’envers sur la console.
Console.Write("Entrez un mot : ")
Dim mot As String = Console.ReadLine()
For i As Integer = mot.Length - 1 To 0 Step -1
Console.Write(mot(i))
Next
Console.WriteLine()
Exercice 8: Somme de Séquence
Écrivez un programme qui utilise une boucle For...Next pour calculer la somme de la séquence suivante : 1 + 1/2 + 1/3 + … + 1/n. Demandez à l’utilisateur d’entrer la valeur de n et affichez la somme.
Console.Write("Entrez la valeur de n : ")
Dim n As Integer = Integer.Parse(Console.ReadLine())
Dim somme As Double = 0.0
For i As Integer = 1 To n
somme += 1.0 / i
Next
Console.WriteLine("La somme de la séquence est : " & somme)
