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

Pascal Discussion :

Premier programme en Pascal


Sujet :

Pascal

  1. #1
    Candidat au Club
    Femme Profil pro
    Étudiant
    Inscrit en
    Janvier 2015
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 30
    Localisation : Sénégal

    Informations professionnelles :
    Activité : Étudiant
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Janvier 2015
    Messages : 2
    Points : 3
    Points
    3
    Par défaut Premier programme en Pascal
    Bonjour je suis étudiante en math appliquées et informatique.J'essaie de compiler un programme mais ça ne marche pas.
    Le voici:
    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
    program calcul;
    var prixunitaire,nombrearticle,prixhorstaxe,tva,prixttc:integer;
    const tauxtva:=0,186:real;
    begin
    read(prixunitaire);
    prixunitaire:=45,65;
    writeln(' prix unitaire:=',prixunitaire);
    read(nombrearticle);
    nombrearticle:=17;
    writeln('nombre article:=',nombrearticle);
    read(prixhorstaxe);
    prixhorstaxe:=prixunitaire*nombrearticle;
    writeln('prix hors taxe:=',prixhorstaxe);
    read(tva);
    tva:=prixhorstaxe*tauxtva;
    witeln('tva:=',tva);
    read(prixttc);
    prixttc;=prixhorstaxe+tva;
    writeln('prix ttc:='prixttc);
    end.

  2. #2
    Expert confirmé
    Avatar de anapurna
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2002
    Messages
    3 418
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Arts - Culture

    Informations forums :
    Inscription : Mai 2002
    Messages : 3 418
    Points : 5 816
    Points
    5 816
    Par défaut
    salut léa
    la prochaine fois crée toi un post plutot que d'en reprendre un qui n'as pas la même problématique

    ceci dit pour ton probleme c'est normal que cla ne marche pas

    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
    program calcul;
    var 
       nombrearticle : Integer;
       prixunitaire,prixhorstaxe,tva,prixttc: real;//integer;//un nombre decimal n'est pas un entier
    const 
      tauxtva:real =0,186; // dans ce sens là c'est mieux
    begin
       //read(prixunitaire);
       prixunitaire:=45,65; // Pourquoi affecter une valeur alors que tu viens de demander une saisi ?
       writeln(' prix unitaire:=',prixunitaire);
      
      //read(nombrearticle);
      nombrearticle:=17;
      writeln('nombre article:=',nombrearticle);
      
       read(prixhorstaxe);
       prixhorstaxe:=prixunitaire*nombrearticle;
       writeln('prix hors taxe:=',prixhorstaxe);
       
       //read(tva);
       tva:= prixhorstaxe*tauxtva;
       witeln('tva:=',tva);
       //read(prixttc);
       
       prixttc:=prixhorstaxe+tva;
       writeln('prix ttc:=',prixttc);
    end.
    voila je pense que ton code devrais etre plus fonctionnel
    Nous souhaitons la vérité et nous trouvons qu'incertitude. [...]
    Nous sommes incapables de ne pas souhaiter la vérité et le bonheur, et sommes incapables ni de certitude ni de bonheur.
    Blaise Pascal
    PS : n'oubliez pas le tag

  3. #3
    Responsable Lazarus & Pascal

    Avatar de gvasseur58
    Homme Profil pro
    Cultivateur de code (bio)
    Inscrit en
    Février 2013
    Messages
    1 436
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Activité : Cultivateur de code (bio)
    Secteur : Enseignement

    Informations forums :
    Inscription : Février 2013
    Messages : 1 436
    Points : 20 855
    Points
    20 855
    Billets dans le blog
    84
    Par défaut
    Bonjour Léa,

    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
     
    program calcul;
    var 
       nombrearticles: Integer; // les "s" sont utiles pour mieux comprendre le sens d'une variable
       prixunitaire,prixhorstaxes,tva,prixttc: Real;
    const 
      tauxtva: Real = 0.186;
    begin
      readln(prixunitaire); // plutôt lire la variable que lui affecter une valeur qui serait celle d'une constante...
      writeln('prix unitaire = ',prixunitaire); // ici, le := de Pascal n'a pas de sens => on n'écrit pas ainsi dans la vie courante
     
      readln(nombrearticles);
      writeln('nombre d''articles = ',nombrearticles);
     
      prixhorstaxes:=prixunitaire*nombrearticles;
      writeln('prix hors taxes = ',prixhorstaxes);
     
      tva:= prixhorstaxes*tauxtva;
      writeln('tva = ',tva); // attention à la syntaxe : pas "witeln"
     
     
      prixttc:=prixhorstaxes+tva;
      writeln('prix ttc= ',prixttc);
    end.
    Le code exige d'être très rigoureux
    Le programme fourni permet de calculer n'importe quel prix ttc à partir de l'entrée de l'utilisateur. Il me semble que c'est mieux qu'un programme qui définit des
    variables pour rien...

    Bonne continuation,

    Gilles
    Accès à mon site et à mon blog. Actualités, cours et ressources Delphi, Lazarus et Pascal.
    Pensez à la balise - Quelqu'un vous a aidé ou vous appréciez une intervention ? Pensez au

  4. #4
    Candidat au Club
    Femme Profil pro
    Étudiant
    Inscrit en
    Janvier 2015
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 30
    Localisation : Sénégal

    Informations professionnelles :
    Activité : Étudiant
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Janvier 2015
    Messages : 2
    Points : 3
    Points
    3
    Par défaut remerciement
    merci pour le coup de main.

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

Discussions similaires

  1. [JDOM] Mon premier programme java-xml
    Par adilo dans le forum Format d'échange (XML, JSON...)
    Réponses: 3
    Dernier message: 12/07/2006, 13h12
  2. premier programme!
    Par kriskikout dans le forum Langage
    Réponses: 8
    Dernier message: 11/02/2006, 16h10
  3. [Debutant]Premier programme blemes+ questions
    Par Bakura dans le forum Débuter
    Réponses: 21
    Dernier message: 07/10/2005, 18h26
  4. [Language] Aide sur mon premier programme Java?
    Par hash2zo dans le forum Langage
    Réponses: 15
    Dernier message: 27/09/2005, 19h26
  5. [Débutant] Mon premier programme: rien ne va...
    Par vincent0 dans le forum OpenGL
    Réponses: 10
    Dernier message: 02/08/2005, 13h59

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