Problème dans prog de mon prof !!

Fermé
Djilali - 25 déc. 2007 à 05:29
 Djilali - 25 déc. 2007 à 22:05
Salut, je suis actuellement en 1ere année de licence info et j'ai un TP à rendre, prochainement, qui est le jeu du pendu! Mais dans le fichier Dico.pas(génère un mot au hazard) que notre prof nous a fourni il semble avoir une erreur:
26/14------Dico.pas------ Fatal: Syntax error, [ expected but OF found.

Voilà le programme :

unit dico;

interface

function mot_au_hasard : STRING;


implementation
const nb_max_mot = 70000;

var
t : array Xof STRING; {X endroit de l'erreur}
n : CARDINAL;


procedure initialiser(const nom_fichier_dictionnaire : STRING);
var
f : TEXT;
i : CARDINAL;
begin
i:=0;
assign(f,nom_fichier_dictionnaire);
reset(f);
setlength(t,nb_max_mot);
while not eof(f) do begin
readln(f,t[i]);
i:=i+1;
end (*while*);
n:=i;
close(f);
end (*initialiser*);

function mot_au_hasard : STRING;
begin
mot_au_hasard:=t[random(N)];
end (*mot_au_hasard*);


initialization
randomize();
initialiser('dico.txt');
end.


Est ce que vous auriez une idée sur le problème ?

9 réponses

mype Messages postés 2435 Date d'inscription jeudi 1 novembre 2007 Statut Membre Dernière intervention 16 août 2010 436
25 déc. 2007 à 05:37
c'est quoi le language ?
0
C'est du pascal
0
metrre un espace entre le x et le of
0
Non non, le x c'est moi qui l'ai rajouter pour indiquer l'endroit ou est l'erreur !
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
naabster Messages postés 18 Date d'inscription mardi 27 novembre 2007 Statut Membre Dernière intervention 2 mars 2008 1
25 déc. 2007 à 19:14
je pense k'il ya pa d"erreur, en plus t : array of STRING; c une declaration normal, une table de string..

je sai pa, il m'apparai normal
0
Bah c'est ce que je pense, comme c'est mon prof qu'il la fait mais quand je compile mon programme avec dev-Pascal, il me signal une erreur !
0
naabster Messages postés 18 Date d'inscription mardi 27 novembre 2007 Statut Membre Dernière intervention 2 mars 2008 1
25 déc. 2007 à 19:24
haaaa, dsl
alors l"erreur 26/14------Dico.pas------ Fatal: Syntax error, [ expected but OF found. ??
ok il te di ke [ manque,
ben, tu connai comment declarer un tableau en pascal, verifie si c vrai .
0
déclaration array[binf..bsup] of ....
binf= indice borne inferieure, bsup= indice borne supérieure.
essaye donc avec array [1..100] of string par exemple
0
J'ai essayé mais là il me dit :
38 / 14 dico.pas
Error: Incompatible type for arg no. 1: Got Array[1..5] Of SHORTSTRING, expected OPENSHORTSTRING

pour; setlength(t,nb_max_mot);
0