Voici un exemple d'une classe permettant d'afficher un triangle Pascal que j'ai développer pour un exercice à l'école:
FOR i = 0 TO 9
FOR j =0 TO i
PRINT " "+STR$(j*i);
NEXT
PRINT
NEXT
REM Dessin Triangle
FOR i = 0 TO 12
FOR j = 0 TO 13-i
PRINT " ";
NEXT
PRINT "< ";
FOR j = 0 TO i+i
PRINT "x ";
NEXT
PRINT "*"
NEXT
WAIT KEY
on obtiendra le résultat suivant :
00 1
0 2 4
0 3 6 9
0 4 8 12 16
0 5 10 15 20 25
0 6 12 18 24 30 36
0 7 14 21 28 35 42 49
0 8 16 24 32 40 48 56 64
0 9 18 27 36 45 54 63 72 81
< x *
< x x x *
< x x x x x *
< x x x x x x x *
< x x x x x x x x x *
< x x x x x x x x x x x *
< x x x x x x x x x x x x x *
< x x x x x x x x x x x x x x x *
< x x x x x x x x x x x x x x x x x *
< x x x x x x x x x x x x x x x x x x x *
< x x x x x x x x x x x x x x x x x x x x x *
< x x x x x x x x x x x x x x x x x x x x x x x *
< x x x x x x x x x x x x x x x x x x x x x x x x x *
Voir également
Dernière mise à jour : Samedi, le 4 octobre 2008