Aller au contenu
  • Pas encore inscrit ?

    Pourquoi ne pas vous inscrire ? C'est simple, rapide et gratuit.
    Pour en savoir plus, lisez Les avantages de l'inscription... et la Charte de Zébulon.
    De plus, les messages que vous postez en tant qu'invité restent invisibles tant qu'un modérateur ne les a pas validés. Inscrivez-vous, ce sera un gain de temps pour tout le monde, vous, les helpeurs et les modérateurs ! :wink:

Problème de programme sous Dev-Pascal


Invité Crazy_Rabbit

Messages recommandés

Invité Crazy_Rabbit

Bonjours,

j'ai commencé un programme utilisant les pointeurs (c'est une premiere fois), dans le but de crée des fichiers à l'aide de variables RECORD, malheuresement une erreur me bloque et je ne trouve pas; c'est peut etre bete mais une aide exterieur me serait precieuse.

 

program creation;

 

type

ETUDIANT = RECORD

NUMERO : integer;

NOM : STRING[25];

PRENOM : STRING[20];

SEXE : CHAR;

FAC : CHAR;

AE : INTEGER;

END;

 

VAR

FETUDIANT : FILE OF ETUDIANT;

FICHE : ETUDIANT;

REP : CHAR;

 

BEGIN

 

ASSIGN(FETUDIANT,'C:\Users\Morgan\Documents\program dev-pascal');

 

REWRITE(FETUDIANT);

 

WRITELN('Voulez vous creer un enregistrement ? (O/N)');

READLN(REP);

 

WHILE REP='O' DO

BEGIN

WRITELN('NUMERO =');

READLN(FICHE.NUMERO);

 

WRITELN('NOM =');

READLN(FICHE.NOM);

 

WRITELN('PRENOM =');

READLN(FICHE.PRENOM);

 

WRITELN('SEXE =');

READLN(FICHE.SEXE);

 

WRITELN('FACULTE =');

READLN(FICHE.FAC);

 

WRITELN('ANNEE D ETUDE =');

READLN(FICHE.AE);

 

WRITE(FETUDIANT,FICHE);

 

WRITELN('Creer un autre enregistrement ? (O/N)');

READLN(REP);

 

END;

 

CLOSE(FETUDIANT);

READLN();

END.

 

 

Le program compile mais une fois executé il se referme directement, cependant un fichier se crée à l'emplacement voulu mais contenant du texte incomprehensible avec des bouts du program...

 

Si vous avez une solution, merci.

Lien vers le commentaire
Partager sur d’autres sites

Rejoindre la conversation

Vous pouvez publier maintenant et vous inscrire plus tard. Si vous avez un compte, connectez-vous maintenant pour publier avec votre compte.
Remarque : votre message nécessitera l’approbation d’un modérateur avant de pouvoir être visible.

Invité
Répondre à ce sujet…

×   Collé en tant que texte enrichi.   Coller en tant que texte brut à la place

  Seulement 75 émoticônes maximum sont autorisées.

×   Votre lien a été automatiquement intégré.   Afficher plutôt comme un lien

×   Votre contenu précédent a été rétabli.   Vider l’éditeur

×   Vous ne pouvez pas directement coller des images. Envoyez-les depuis votre ordinateur ou insérez-les depuis une URL.

  • En ligne récemment   0 membre est en ligne

    • Aucun utilisateur enregistré regarde cette page.
×
×
  • Créer...