VB.Net: Correction des exercices tableaux et matrices 1_2_3

1. Enoncé Exercice 1_2_3

Descriptions

• Les tableaux sont comme les variables soit locales, soit globales et obéissent aux mêmes règles. Dans VB, il existe deux types de tableaux : les tableaux de taille fixe et les tableaux dynamiques.
• Les tableaux peuvent êtres déclarés à une seule dimension ou à n dimensions

Correction Exercice 1_2_3

Module exercice1_2_3
    Sub Main(args As String())
        System.Console.WriteLine("Exercice 1")
        exercice1()
        System.Console.WriteLine("Exercice 2")
        exercice2()
        System.Console.WriteLine("Exercice 3")
        exercice3()
    End Sub
    Private Sub exercice1()
        Dim tableau As Integer() = New Integer(2) {}
        Dim min As Integer = Nothing
        For i As Integer = 0 To 2
            System.Console.WriteLine("Saisir l'entier {0}", i + 1)
            tableau(i) = Convert.ToInt16(System.Console.ReadLine())
        Next
        'Recherche de minimum
        min = tableau(0)
        For i As Integer = 0 To 2
            For j As Integer = 0 To 2
                If min > tableau(j) Then
                    min = tableau(j)
                End If
            Next
        Next
        Console.WriteLine("Le minimum est: " & min & " ")
    End Sub
    Private Sub exercice2()
        Dim tab As Integer() = New Integer(26 - 6) {}
        Dim rnd As New Random()
        ' affectation de valeurs entières, pris au hasard entre 5 et 10, au tableau
        For i As Integer = 0 To 26 - 6
            tab(i) = rnd.Next(5, 26)
        Next
        'affichage des valeurs du tableau
        For i As Integer = 0 To 26 - 6
            Console.WriteLine(tab(i) & " ")
        Next
        'Console.ReadLine()
    End Sub
    Private Sub exercice3()
        Dim alphabet As Char() = New Char(25) {}
        For i As Integer = 0 To 25
            alphabet(i) = Convert.ToChar(65 + i)
        Next
        For i As Integer = 0 To 25
            Console.WriteLine(alphabet(i))
        Next
    End Sub


End Module