Répondre à la discussion
Affichage des résultats 1 à 4 sur 4

langage pascal




  1. #1
    Youssef1111

    Thumbs up langage pascal

    Demain, je dois envoyer un dm a un professeur mais lorsque j'ai fini mon travail, il me disent qu'il y a une faute dans readln.
    S'il vous plait aidez moi. voici ce que j'ai fait

    Code:
     Program Prix_terrain;
    Var 
     nom:string;
     long:integer;
     larg:integer;
     a:integer;
     b:integer;
     c:integer;
    BEGIN
    writeln('Saisissez votre nom, je vous pris');
    readln(nom);
    writeln('Bonjour ',nom,',ceci est un programme permettant de calculer le prix du terrain selon ses dimensions et le prix du m²');
    writeln('Avant toute chose ',nom,',si le terrain est un rectangle ,appuyez sur 1, et si cest un carre ,appuyez sur 2')
    readln(a);
    Case a of
    1 :  begin
         writeln('Tapez le prix du m²');
         readln(b);
         writeln('Tapez la longueur du terrain');
         readln(long);
         writeln('Tapez la largueur du terrain');
         readln(larg);
         c:=long*larg*b
         writeln('Le prix du terrain est de ',c);
         readln;
         end
    2 :   begin
          writeln('Tapez le prix du m²');
          readln(b);
          writeln('Tapez la mesure du cote');
          readln(long);
          c:=long*long*b
          writeln('Le prix du terrain est de ',c);
          readln;
      end
    
    Else writeln('Ce nest pas demandé') ;
    End ; 
    readln;
    END.
    Dites moi ce qui cloches s'il vous plait et merci d'avance !!!!

    -----

    Dernière modification par JPL ; 20/01/2018 à 19h36. Motif: Ajout de la balise Code (#) pour garder l'indentation

  2. Publicité
  3. #2
    Schrodies-cat

    Re : langage pascal

    Il me semble qu'il y a un END de plus qu'il n'y a de BEGIN.
    Il n'est pire sot que qui ne veut pas comprendre .

  4. #3
    Schrodies-cat

    Re : langage pascal

    Euh non ! le END surnuméraire correspond au case , par contre j'ai un doute sur le point virgule qui le suit.
    Il n'est pire sot que qui ne veut pas comprendre .


  5. #4
    pm42

    Re : langage pascal

    Je ne crois pas mais mettre les ; à la fin des instructions est indispensable et normalement le compilateur est assez clair sur le sujet...

Discussions similaires

  1. question sur un algo language pascal
    Par cl0ch3tt3 dans le forum Programmation et langages, Algorithmique
    Réponses: 9
    Dernier message: 17/10/2012, 20h50
  2. Compilation Language C en Language Hex pour PIC16F877
    Par bibi_6919 dans le forum Électronique
    Réponses: 8
    Dernier message: 19/09/2011, 17h43
  3. language c
    Par fouzia19 dans le forum Logiciel - Software - Open Source
    Réponses: 3
    Dernier message: 04/12/2008, 21h44
  4. Language C et LCD
    Par lancedelot78 dans le forum Électronique
    Réponses: 1
    Dernier message: 12/03/2007, 22h48
  5. language asp
    Par rachamedia dans le forum Logiciel - Software - Open Source
    Réponses: 1
    Dernier message: 24/01/2007, 14h35