IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
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

Turbo Pascal Discussion :

[TP] Détection de nom de mois


Sujet :

Turbo Pascal

  1. #21
    Membre confirmé
    Profil pro
    Inscrit en
    Avril 2007
    Messages
    113
    Détails du profil
    Informations personnelles :
    Âge : 36
    Localisation : Tunisie

    Informations forums :
    Inscription : Avril 2007
    Messages : 113
    Par défaut
    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
    program moins ;
    uses WinCrt;
    var
    c:integer;
    begin
    repeat
    writeln(' donnes le numero de moin');
    readln  (c);
    until c in [1..12] ;
    case c of
    11,12,1: writeln('c est l hiver');
    2,3,4:writeln ('c est le printemps');
    5,6,7: writeln ('c est l été ');
    8,9,10: writeln('c est l automne');
    end;
    end.

  2. #22
    Membre Expert
    Avatar de krachik
    Inscrit en
    Décembre 2004
    Messages
    1 964
    Détails du profil
    Informations forums :
    Inscription : Décembre 2004
    Messages : 1 964
    Par défaut
    oui j'avou que ça traite pour toute les saisons
    mais a la base ce n'est pas ce que disait l'ennoncé c'etais juste pour l'été
    mais bon........
    @+

  3. #23
    Expert confirmé

    Inscrit en
    Août 2006
    Messages
    3 967
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 3 967
    Par défaut
    Kaj,
    Citation Envoyé par gadalla
    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
    program moins ;
    uses WinCrt;
    var
    c:integer;
    begin
    repeat
    writeln(' donnes le numero de moin');
    readln  (c);
    until c in [1..12] ;
    case c of
    11,12,1: writeln('c est l hiver');
    2,3,4:writeln ('c est le printemps');
    5,6,7: writeln ('c est l été ');
    8,9,10: writeln('c est l automne');
    end;
    end.
    Les balises [ code] ?
    La mise en forme du code ? (il faut prendre l'habitude de le faire systématiquement, ensuite on finit par le faire sans même y porter attention).

    Pour afficher des apostrophes, il faut les doubler dans la chaîne à afficher.
    Par exemple
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    5,6,7: writeln ('c''est l''été ');

  4. #24
    Membre confirmé
    Profil pro
    Inscrit en
    Avril 2007
    Messages
    113
    Détails du profil
    Informations personnelles :
    Âge : 36
    Localisation : Tunisie

    Informations forums :
    Inscription : Avril 2007
    Messages : 113
    Par défaut
    jai pas bien compris tu peut me donner un exemple????????

  5. #25
    Membre Expert
    Avatar de krachik
    Inscrit en
    Décembre 2004
    Messages
    1 964
    Détails du profil
    Informations forums :
    Inscription : Décembre 2004
    Messages : 1 964
    Par défaut
    Citation Envoyé par droggo
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    5,6,7: writeln ('c''est l''été ');
    voila l'exemple

  6. #26
    Membre averti
    Profil pro
    Inscrit en
    Février 2007
    Messages
    49
    Détails du profil
    Informations personnelles :
    Âge : 35
    Localisation : Tunisie

    Informations forums :
    Inscription : Février 2007
    Messages : 49
    Par défaut
    Citation Envoyé par gadalla
    program moins ;
    uses WinCrt;
    var
    c:integer;
    begin
    repeat
    writeln(' donnes le numero de moin');
    readln (c);
    until c in [1..12] ;
    case c of
    11,12,1: writeln('c est l hiver');
    2,3,4:writeln ('c est le printemps');
    5,6,7: writeln ('c est l été ');
    8,9,10: writeln('c est l automne');
    end;
    end.
    je ne connais pas la fonction ou l'affectation " repeat" et " case ..of"
    Donc cette methode, je ne peux pas l'utiliser puisque je ne l'ai pas étudié.

  7. #27
    Membre confirmé
    Profil pro
    Inscrit en
    Avril 2007
    Messages
    113
    Détails du profil
    Informations personnelles :
    Âge : 36
    Localisation : Tunisie

    Informations forums :
    Inscription : Avril 2007
    Messages : 113
    Par défaut
    tu veut avec if........else??????

  8. #28
    Membre averti
    Profil pro
    Inscrit en
    Février 2007
    Messages
    49
    Détails du profil
    Informations personnelles :
    Âge : 35
    Localisation : Tunisie

    Informations forums :
    Inscription : Février 2007
    Messages : 49
    Par défaut
    Citation Envoyé par gadalla
    tu veut avec if........else??????
    oui

Discussions similaires

  1. Récupérer le nom du mois à partir d'une date.
    Par zooffy dans le forum ASP.NET
    Réponses: 10
    Dernier message: 04/03/2008, 14h48
  2. [BO 5.1]Affichage du nom du mois
    Par LP-mpascolo dans le forum Designer
    Réponses: 7
    Dernier message: 22/10/2007, 10h05
  3. Réponses: 6
    Dernier message: 06/06/2007, 17h57
  4. [ACCESS] Nom du mois à partir d'une date
    Par leloup84 dans le forum Access
    Réponses: 12
    Dernier message: 05/04/2007, 14h41
  5. Réponses: 12
    Dernier message: 31/03/2007, 08h38

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