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 27 28 29 30 31 32
|
xNote_1, xNote_2, xNote_3, xNote_4, xNote_5, xNote_6 sont des numériques;
xNote_1_new, xNote_2_new, xNote_3_new, xNote_4_new, xNote_5_new, xNote_6_new sont des numériques;
i,j,k,l,m,n sont des entiers;
xNote_1 = 8; xNote_2 = 14; xNote_3 = 18; xNote_4 = 12; xNote_5 = 6; xNote_6 = 15;
TableSupprimeTout(TABLE_les_notes);
TableAjouteLigne(TABLE_les_notes,xNote_1,xNote_2,xNote_3,xNote_4,xNote_5,xNote_6);
POUR i = 0 _A_ 6
POUR j = 0 _A_ 6
POUR k = 0 _A_ 6
POUR l = 0 _A_ 6
POUR m = 0 _A_ 6
POUR n = 0 _A_ 6
SI ((i+j+k+l+m+n) = 14) ALORS
xNote_1_new = xNote_1+i;
xNote_2_new = xNote_2+j;
xNote_3_new = xNote_3+k;
xNote_4_new = xNote_4+l;
xNote_5_new = xNote_5+m;
xNote_6_new = xNote_5+n;
SI (xNote_1_new<=21 ET xNote_2_new<=21 ET xNote_3_new<=21 ET xNote_4_new<=21 ET xNote_5_new<=21 ET xNote_6_new<=21) ALORS
TableAjouteLigne(TABLE_les_notes,xNote_1_new,xNote_2_new,xNote_3_new,xNote_4_new,xNote_5_new,xNote_6_new);
FIN
FIN
FIN
FIN
FIN
FIN
FIN
FIN |
Partager