slt,
Nox >> met un Stop juste avant le End Sub de Sub Main() et regarde dans ton Immediate Window, tu verras le beau carré magique. C'est dans cette fenêtre qu'écrit la command Debug.Print <text as string>
Afpa >> j'suis pas sur que ca marche. J'ai eu ça comme résultat :
Il me semblait qu'en diagonale on saute une case, et en vertical ou horizontal, on saute 2 cases ... mais j'ai peut-être pas les bonnes règles ??
Et ca sert à quoi PairImpair = 30 Mod 16 à la fin, vu que ca fait toujours 14 ??
5 déc. 2002 à 19:32
exellent !!!
PairImpair = 30 Mod 16
c'est pour rien, c'etait un test à l'arracher pour autre chose. rien à voir avec ca
++
afpa powaaaaaa
5 déc. 2002 à 17:15
Nox >> met un Stop juste avant le End Sub de Sub Main() et regarde dans ton Immediate Window, tu verras le beau carré magique. C'est dans cette fenêtre qu'écrit la command Debug.Print <text as string>
Afpa >> j'suis pas sur que ca marche. J'ai eu ça comme résultat :
Carré magique de 3 de coté.
| 8 | 1 | 6
------------------------
| 3 | 5 | 7
------------------------
| 4 | 9 | 2
------------------------
14
Carré magique de 5 de coté.
| 23 | 6 | 19 | 2 | 15
----------------------------------------
| 10 | 18 | 1 | 14 | 22
----------------------------------------
| 17 | 5 | 13 | 21 | 9
----------------------------------------
| 4 | 12 | 25 | 8 | 16
----------------------------------------
| 11 | 24 | 7 | 20 | 3
----------------------------------------
14
Il me semblait qu'en diagonale on saute une case, et en vertical ou horizontal, on saute 2 cases ... mais j'ai peut-être pas les bonnes règles ??
Et ca sert à quoi PairImpair = 30 Mod 16 à la fin, vu que ca fait toujours 14 ??
5 déc. 2002 à 15:32
je lai mis dans un module, sa me demande un nombre impair et sa quite
5 déc. 2002 à 15:24