Accueil 1h - Accueil démo - Accueil 24H

💡 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