Exercice VB: Le triangle de Pascal

Rédigé par GC Team, Publié le 01 Janvier 2012, Mise à jour le Mardi, 30 Novembre 1999 00:00
Participez au vote ☆☆☆☆☆★★★★★

Travail à Faire :

Donner le code rn vb pour  Créer Le triangle de Pascal

Principe :

Le triangle de Pascal est le tableau des coefficients qui sont utilisés pour le développement de certaines expressions comme (a+b)² ou (a+b)n.

Cela s'appelle la "formule du binôme de Newton". Les coefficients s'appellent les "coefficients binomiaux" ou "coefficients du binôme".

Ce triangle est le suivant :

0 : 1          (a+b)0 = 1

1 : 1 1        (a+b)1 = 1*a + 1*b

2 : 1 2 1      (a+b)2 = 1*a2 + 2*a*b + 1*b2

3 : 1 3 3 1    (a+b)3 = 1*a3 + 3*a²*b + 3*a*b² + 1*b3

4 : 1 4 6 4 1  (a+b)4 = 1*a4 + 4*a3*b + 6*a²*b² + 4*a*b3 + 1*b4

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26

Module Le triangle de Pascal
   
 Sub Main()
        Dim i As Integer
        Dim j As Integer
        ' Triangle de nombre de Pascal 
        For i = 0 To 9
            For j = 0 To i
                Console.Write(" " & j * i)
            Next j
            Console.WriteLine()
        Next i
        ' Dessin Triangle 
        For i = 0 To 12
            For j = 0 To 13 - i
                Console.Write(" ")
            Next j
            Console.Write("< ")
            For j = 0 To i + i
                Console.Write("x ")
            Next j
            Console.WriteLine("*")
        Next i
        Console.ReadLine()
    End Sub
 
End Module