Bonjour,
j'ai commencé a apprendre le Pascal il y a deux semaines de cela et je me suis lancé dans le projet de créer l'algorithme du jeu de la vie dont voici mon code :
Or quand je l'exécute ne s'affiche qu'un tas de zéros
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 rogram algo_jeu_de_la_vie; label boucle; CONST n=10; (* taille des tableaux (parametrable) *) var a,b,count,z : integer; tab1 : Array[0..n-1, 0..n-1] of integer; (* declaration tableaux *) tab2 : Array[0..n-1, 0..n-1] of integer; begin a:=0; b:=0; for a:=0 to (n-1) do begin for b:=0 to (n-1) do (* double for (= passage par toute les cases du tableau) *) begin randomize; (* mise des cases a une valeur aleatoire *) tab1[a, b]:=(random(2)); end; end; for a:=0 to (n-1) do begin for b:=0 to (n-1) do begin write(tab1[a,b]:2); end; writeln; end; end.
Ya-t-il quelqu'un qui sait où mon code buggue.
Bien à vous qui me lisez...
Partager