Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Pascal Discussion :

[Débutant] Besoin d'aide pour un exercice


Sujet :

Pascal

  1. #1
    Inactif
    Inscrit en
    janvier 2007
    Messages
    5
    Détails du profil
    Informations forums :
    Inscription : janvier 2007
    Messages : 5
    Points : 6
    Points
    6
    Par défaut [Débutant] Besoin d'aide pour un exercice
    Je vais vous citer le problème:
    Ecrire un programme qui permet de codifier 1000 médicaments présentés sous 10 formes différentes et appartenant à a 4 familles différentes.

  2. #2
    Expert confirmé
    Avatar de krachik
    Inscrit en
    décembre 2004
    Messages
    1 964
    Détails du profil
    Informations forums :
    Inscription : décembre 2004
    Messages : 1 964
    Points : 4 066
    Points
    4 066
    Par défaut
    Bonjour
    moi j'ai 2 questions:
    tu penses qu'on va faire ton exo à ta place?
    tu sais par ou commencer?
    tu sais quoi utiliser?
    c'est quel genre de donnés?
    Je suis ce que je suis grâce à ce que nous sommes tous Humanité aux Humains!! !

    Entre ce que je pense, ce que je veux dire, ce que je crois dire, ce que je dis ce que vous avez envie d'entendre, ce que vous croyez entendre, ce que vous entendez, ce que vous avez envie de comprendre, ce que vous comprenez ... Il y a dix possibilités que nous ayons des difficultés à communiquer. Mais essayons quand meme ....... E. Wells

  3. #3
    Inactif
    Inscrit en
    janvier 2007
    Messages
    5
    Détails du profil
    Informations forums :
    Inscription : janvier 2007
    Messages : 5
    Points : 6
    Points
    6
    Par défaut regarde
    jai essayer

    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
    27
    28
    29
    30
    program codification;
    uses wincrt;
    type interval=0..9;
    type intervale=0..3;
    var
    n,i,j:integer;
    forme:interval;
    famille:interval;
    nom:char;
    begin
    i:=0;
     
    write('donnez le nombre de medicament a codifier:');
    read(n);
     
    repeat
    i:=i+1;
    begin
    write('donner le nom de medicament: ');
    readln(nom);
    write('donner la famille du medicament: ');
    readln(famille);
    write('donner la forme du medicament: ');
    readln(forme);
    for j:=1 to n-1 do;
    writeln('le code du medicament:',0,famille,forme,j-1);
    end;
     
    until i>n-1;
    end.

  4. #4
    Inactif
    Inscrit en
    janvier 2007
    Messages
    5
    Détails du profil
    Informations forums :
    Inscription : janvier 2007
    Messages : 5
    Points : 6
    Points
    6
    Par défaut un probleme avec error 22
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    type code=record
         medicament:array[1..1000]of string;
         forme:array[1..10] of string;
         famille:array[1..4]string;
         end;
    le compilateur fais une erreur de structure too large

  5. #5
    Expert confirmé
    Avatar de krachik
    Inscrit en
    décembre 2004
    Messages
    1 964
    Détails du profil
    Informations forums :
    Inscription : décembre 2004
    Messages : 1 964
    Points : 4 066
    Points
    4 066
    Par défaut
    bonjour,
    l'erreur doit se situer au de
    medicament:array[1..1000]of string;
    parce qu'une chaine de caractere est trop long ,essaie de fixer la taille(longueur) du string que tu utilises exemple
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    medicament:array[1..1000]of string[5];
    Je suis ce que je suis grâce à ce que nous sommes tous Humanité aux Humains!! !

    Entre ce que je pense, ce que je veux dire, ce que je crois dire, ce que je dis ce que vous avez envie d'entendre, ce que vous croyez entendre, ce que vous entendez, ce que vous avez envie de comprendre, ce que vous comprenez ... Il y a dix possibilités que nous ayons des difficultés à communiquer. Mais essayons quand meme ....... E. Wells

  6. #6
    Expert confirmé
    Avatar de krachik
    Inscrit en
    décembre 2004
    Messages
    1 964
    Détails du profil
    Informations forums :
    Inscription : décembre 2004
    Messages : 1 964
    Points : 4 066
    Points
    4 066
    Par défaut
    salut,
    où se situe ton problème?
    ce serait bien d'utiliser une structure d'enregistrement.......
    Je suis ce que je suis grâce à ce que nous sommes tous Humanité aux Humains!! !

    Entre ce que je pense, ce que je veux dire, ce que je crois dire, ce que je dis ce que vous avez envie d'entendre, ce que vous croyez entendre, ce que vous entendez, ce que vous avez envie de comprendre, ce que vous comprenez ... Il y a dix possibilités que nous ayons des difficultés à communiquer. Mais essayons quand meme ....... E. Wells

  7. #7
    Membre éclairé
    Profil pro
    Inscrit en
    octobre 2004
    Messages
    633
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : octobre 2004
    Messages : 633
    Points : 711
    Points
    711
    Par défaut
    Bonjour,

    Pourquoi n'avoir pas continué ton sujet précédent ?

    Plus important : ta structure ainsi définie ne correspond pas du tout à ce dont tu as besoin, qui est :

    * une structure définissant UN médicament, soit :
    - son nom,
    - sa forme,
    - sa famille

    * un tableau de cette structure, pour contenir les caractéristiques de 1000 médicaments.


    Pour les champs "forme" et "famille", le mieux est probablement de définir des types énumérés, avec éventuellement un moyen d'afficher en clair ces types, par exemple des tableaux de chaînes de caractères pointés par ces types.

    La balle est dans ton camp.
    Compilation sans erreur ne signifie pas programme sans erreur.
    L'indentation n'a pas été imaginée pour faire beau, mais pour faciliter la lecture des programmes.

  8. #8
    Inactif
    Inscrit en
    janvier 2007
    Messages
    5
    Détails du profil
    Informations forums :
    Inscription : janvier 2007
    Messages : 5
    Points : 6
    Points
    6
    Par défaut
    tu peux developer j'ai pas compris ton idee de type enumeree

  9. #9
    Inactif
    Inscrit en
    janvier 2007
    Messages
    5
    Détails du profil
    Informations forums :
    Inscription : janvier 2007
    Messages : 5
    Points : 6
    Points
    6
    Par défaut aider moi svp et merci
    je peux faire comme ça :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    writeln('donner la famille du medicament');
    readln(fa);
    val(fa,fam,e);
           case fam of
    c.famille[1]=antibiotique;
    c.famille[2]=antiseptique;
    c.famille[3]=antiinflammatoire;
    c.famille[4]=antispasmodique;

  10. #10
    Membre averti
    Homme Profil pro
    Ingénieur développement logiciels
    Inscrit en
    octobre 2005
    Messages
    218
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : octobre 2005
    Messages : 218
    Points : 310
    Points
    310
    Par défaut
    Il est sans doute trop tard pour ton exercice donc on peut donner la solution. Ce qu'essayait de t'indiquer themwho c'est que ta structure correspond à pas grand chose.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    type code=record
         medicament:array[1..1000]of string;
         forme:array[1..10] of string;
         famille:array[1..4]string;
         end;
    Ce qu'on te demande, ressemblerait plus à .
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    type 
       // énumération des valeurs possibles pour la forme
       TForme = (sirop, gelule, suppositoire, pommade);
       // énumération des valeurs possibles pour la famille
       TFamille = (antibiotique, analgésique...);
       // un medicament a pour caractéristique un nom, une forme 
       // et appartient à une famille
       TMedicament=record
         nom :string;
         forme :TForme;
         famille :TFamille;
       end;
      // on peut stocker 1000 médicaments
      tabmedicament : array[1..1000] of TMedicament;

Discussions similaires

  1. [débutant] besoin d'aide pour un programme
    Par acdchornet dans le forum C++
    Réponses: 12
    Dernier message: 26/10/2006, 23h32
  2. [Débutant] Besoin d'aide pour modifier un jeu
    Par stoff66 dans le forum Assembleur
    Réponses: 9
    Dernier message: 31/08/2006, 19h24
  3. [Débutant]Besoin d'aide pour gestion d'exceptions
    Par H1B4K dans le forum Langage
    Réponses: 2
    Dernier message: 14/06/2006, 11h01
  4. Besoin d'aide pour un exercice sur les registres
    Par zakuza dans le forum Assembleur
    Réponses: 5
    Dernier message: 14/04/2006, 15h23
  5. [débutant].besoin d'aide pour servlet
    Par 2tsiris dans le forum Servlets/JSP
    Réponses: 5
    Dernier message: 30/03/2006, 15h36

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo