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 :

[TPW] Chiffres en lettres (Pascal ou C)


Sujet :

Turbo Pascal

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre habitué
    Inscrit en
    Février 2006
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Février 2006
    Messages : 10
    Par défaut [TPW] Chiffres en lettres (Pascal ou C)
    Salut tout le monde,

    Quelqu'un à t-il une fonction qui permet de transformer un montant saisi de chiffres en lettres (En pascal ou en C).
    Merci!

  2. #2
    Membre éprouvé
    Avatar de Stormy_Ordos
    Profil pro
    Expert sécurité informatique
    Inscrit en
    Mars 2005
    Messages
    91
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations professionnelles :
    Activité : Expert sécurité informatique

    Informations forums :
    Inscription : Mars 2005
    Messages : 91
    Par défaut
    Bonjour,

    en pascal il existe deux fonctions qui remplissent ce but : str et val. Str
    convertit des nombres en Strings et Val convertit des Strings en nombres :

    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
     
     
    uses crt;
     
    var i : integer;
         st : string;
         r : real;
         flag : integer;
     
    begin
           i := 6;
           str(i,st);     
           Writeln(st);   {st = '6'}
           val(st,r,flag); {on convertit st vers r, r = 6.000}
           r:=r*2;
           str(r,st);
           Writeln(st);    {st = 12.0000}  
     
    end.
    flag est ici uniquement pour stocker une valeur en cas d'erreur de conversion.

    a++

  3. #3
    Membre habitué
    Inscrit en
    Février 2006
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Février 2006
    Messages : 10
    Par défaut
    Ok, je compile et je te tiens informé.A+ :o

  4. #4
    Membre habitué
    Inscrit en
    Février 2006
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Février 2006
    Messages : 10
    Par défaut
    désolé,çà ne repond pas à mes attentes.Ce que je veux c'est par exemple: On saisi 2500F et la fonction te ramènes (deux mille cinq cent francs) l'équivalent en lettre.Merci!

  5. #5
    Rédacteur/Modérateur
    Avatar de M.Dlb
    Inscrit en
    Avril 2002
    Messages
    2 466
    Détails du profil
    Informations personnelles :
    Âge : 40

    Informations forums :
    Inscription : Avril 2002
    Messages : 2 466
    Par défaut
    Tout d'abord, merci de lire les règles du forum : http://club.developpez.com/regles et de restez courtois.

    Quel compilateur utilises-tu ?

  6. #6
    Membre habitué
    Inscrit en
    Février 2006
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Février 2006
    Messages : 10
    Par défaut
    TPW(Turbo Pascal Pour Windows)

  7. #7
    Membre Expert
    Avatar de Eric Sigoillot
    Inscrit en
    Mars 2002
    Messages
    1 212
    Détails du profil
    Informations personnelles :
    Âge : 41

    Informations forums :
    Inscription : Mars 2002
    Messages : 1 212
    Par défaut
    Regarder dans les sources disponibles pour Pascal et Delphi :
    http://pascal.developpez.com/sources/
    http://delphi.developpez.com/sources/

    Il y a ce qu'il faut dedans.

    @++

  8. #8
    Membre habitué
    Inscrit en
    Février 2006
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Février 2006
    Messages : 10
    Par défaut
    Merci, mais je n'ais pas trouver ce que je cherche.Peux tu m'indiquer précisement ou je peux trouver cette fonction?
    Merci et a+

  9. #9
    Membre Expert
    Avatar de Eric Sigoillot
    Inscrit en
    Mars 2002
    Messages
    1 212
    Détails du profil
    Informations personnelles :
    Âge : 41

    Informations forums :
    Inscription : Mars 2002
    Messages : 1 212
    Par défaut
    Faudrait pas pousser non plus...

    On ouvre ses yeux sur la page des codes sources Delphi et on trouve. Le temps que tu as perdu à attendre cette réponse tu aurais mieux fait de le passer à chercher sur la page. D'autant plus que les pages de codes sources sont dotées d'une fonction de recherche. Allez, un p'tit effort.

    @++

  10. #10
    Membre habitué
    Inscrit en
    Février 2006
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Février 2006
    Messages : 10
    Par défaut
    Yep, j'y suis.Merci pour tout.je vais exploiter le programme.
    Merci!

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Transformer chiffre en lettre
    Par maximil dans le forum Access
    Réponses: 4
    Dernier message: 22/12/2005, 15h59
  2. conversion chiffre en lettre
    Par arezki76 dans le forum Oracle
    Réponses: 3
    Dernier message: 17/12/2005, 12h31
  3. [VB.NET] Import donnes d'excel : chiffres et lettres
    Par JohnGT dans le forum Windows Forms
    Réponses: 5
    Dernier message: 19/10/2004, 18h53
  4. Réponses: 4
    Dernier message: 21/07/2004, 10h51

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