Accueil de la rubrique - Index alphabétique

đź’ˇ Calcul du prix TTC avec COBOL

Dans ce programme, vous allez apprendre à additionner un tarif hors taxe (TARIF-HT) et une taxe sur la valeur ajoutée (TVA) pour obtenir un prix toutes taxes comprises (PRIX-TTC).


IDENTIFICATION DIVISION.
PROGRAM-ID. CALCUL-TTC.
 
DATA DIVISION.
WORKING-STORAGE SECTION.
01 TARIF-HT    PIC 9(5)V99 VALUE 100.00.
01 TVA         PIC 9(5)V99 VALUE 20.00.
01 PRIX-TTC    PIC 9(5)V99 VALUE 0.00.
 
PROCEDURE DIVISION.
    ADD TARIF-HT TO TVA GIVING PRIX-TTC
    DISPLAY "Le prix TTC est de : " PRIX-TTC
    STOP RUN.
      
  • DĂ©claration de la division d’identification.
  • Nom du programme principal : CALCUL-TTC.
  • DĂ©but de la zone de donnĂ©es.
  • Zone mĂ©moire pour stocker les variables.
  • Variable pour le tarif hors taxe, avec deux dĂ©cimales.
  • Variable pour la TVA, Ă©galement avec deux dĂ©cimales.
  • Variable rĂ©sultat qui contiendra le prix TTC.
  • DĂ©but du bloc d’instructions du programme.
  • Addition de TARIF-HT et TVA, le rĂ©sultat va dans PRIX-TTC.
  • Affichage du rĂ©sultat calculĂ©.
  • Fin du programme.

Téléchargez le code source : 🔍 Voir dans un nouvel onglet | 📥 Télécharger le fichier