Discussion :

[revy7]

Bonjour,

Je dois concevoir un programme qui crée des tableaux de tailles différentes : c'est-à-dire qu'on entrera la taille d'un tableau, puis on l'initialisera à chaque fois. J'ai pensé aux tableaux non-contraints, mais je n'arrive pas à les implanter, voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
tab is array(integer range <>) of integer;
N:integer;
 
composition is
record
numero:integer;
contenu:tab(1..N);
end record;

->à chaque fois le compilateur me retourne "N may be referenced before it has a value".

Merci d'avance.

[Blackknight]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

N may be referenced before it has a value

Le message est clair, tu spécifies une variable de type tableau dont les bornes ne sont pas connues à la création, ça ne peut pas fonctionner.
Au moment où tu écris

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

contenu : tab(1..N)

N doit être initialisé.
Ici, comme tu veux l'utiliser dans un enregistrement, regardes du côté des enregistrements avec discriminant dans cette page ou directement dans l'ARM dans la section traitant des discriminants.
Normalement, tu y trouveras ton bonheur... D'ailleurs, c'est sûr

Mais je n'en dirai pas plus, j'ai l'ipmpression que c'est pour un devoir

[kirua99]

oui le tableau doit être initialiser

[Invité]

Bonjour,

Je dois concevoir un programme qui crée des tableaux de tailles différentes : c'est-à-dire qu'on entrera la taille d'un tableau, puis on l'initialisera à chaque fois. J'ai pensé aux tableaux non-contraints, mais je n'arrive pas à les implanter, voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
tab is array(integer range <>) of integer;
N:integer;
 
composition is
record
numero:integer;
contenu:tab(1..N);
end record;

->à chaque fois le compilateur me retourne "N may be referenced before it has a value".

Merci d'avance.

C'est pas écrit avec Ada !
pseudo-techniquement tu as bien déclaré N.

[Blackknight]

C'est pas écrit avec Ada !

Il manque effectivement quelques type, j'étais complètement passé à côté

[Sigurd9]

Et si tu paramétrais ton type composition ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
type tab is array(integer range <>) of integer;
 
type composition(N : integer) is record
   numero:integer;
   contenu:tab(1..N);
end record;