Construction d'un tableau 1 à 600Résolu

Question

Hello,

Je d&#233;sire construire un tableau num&#233;rot&#233; de 1 &#224; 600 [30 par 20]. 

Comme ceci: 
1    2   3    4    5 . . . 19 20
21 22  23               .... 39 40
...
581 ...                            ...600

quelle fonction dois-je utiliser et comment former mon code??

Merci.

DeltaFX · Accepted Answer

Perso je crois comprendre qu'il veut un tableau d'entier de 1 a 600, auquel cas c'est 

var MyArray : array[1..20,1..30] of integer;
    i,j :integer;


...

for j:=1 to 30 do
  for i:=1 to 20 do
    MyArray[i,j]:=i+(j-1)*20;

et hop.

florenth · Answer

Ta question est floue mais alors, incroyablement floue. (ou c'est moi qui suis dans les vapes ...)
D&#233;j&#224;, un tableau comme tu le demandes (30 par 20) se d&#233;clare comme ceci : 
var MyTab: array[1..30, 1..20] of TMonType.

En plus tu ne nous dis m&#234;me pas ce qu'il doit stocker ni ce que tu veux en faire et tu n'as pas du chercher bien loin pour en arriver l&#224;.
Bref, un peu limite tout &#231;a.

Si tu ne te plantes pas ......
tu ne pousseras jamais

f0xi · Answer

comme le dit florenth, plusieurs solutions :

1 a 600 :

array [1..600] of type

30x20

array [1..30, 1..20] of type

dynamique

array of array of type
...
setlength(Tableau,30);
for N := 0 to High(Tableau) do setlength(Tableau[N],20);

jaymaspoli · Answer

Merci!

Construction d'un tableau 1 à 600

4 réponses

Votre réponse