Exercice 10 : add

Micro-exercice

Objectif : utiliser ADD pour additionner des valeurs et produire un total. Vous allez saisir deux nombres, les additionner, puis afficher le résultat. Cet exercice sert de base à tout ce qui ressemble à un cumul, une somme, ou un compteur.

Ce que vous pratiquez

  • Déclarer des variables numériques simples.
  • Saisir deux valeurs avec ACCEPT.
  • Calculer un total avec ADD.

Repère sur les colonnes

  • Zone A : colonnes 8 à 11 (7 espaces pour divisions et déclarations).
  • Zone B : colonnes 12 à 72 (11 espaces pour instructions).

Le code est affiché en <pre> : l’alignement reste lisible sur mobile.

Exemple minimal COBOL Format fixe
Télécharger le code 
       IDENTIFICATION DIVISION.
       PROGRAM-ID. EXO-ADD-10.

       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01  WS-A                 PIC 99 VALUE 00.
       01  WS-B                 PIC 99 VALUE 00.
       01  WS-TOTAL             PIC 999 VALUE 000.

       PROCEDURE DIVISION.
           DISPLAY "Entrez le premier nombre (00 a 99) : "
           ACCEPT WS-A
           DISPLAY "Entrez le deuxieme nombre (00 a 99) : "
           ACCEPT WS-B

           ADD WS-A TO WS-TOTAL
           ADD WS-B TO WS-TOTAL

           DISPLAY "Total : " WS-TOTAL
           STOP RUN.

Lecture simple

ADD WS-A TO WS-TOTAL signifie : “ajouter la valeur de WS-A dans WS-TOTAL”. Ensuite on fait la même chose avec WS-B. Le résultat final est affiché.

À retenir : pour éviter un total “bizarre”, on initialise le total à zéro (ici PIC 999 VALUE 000). Et on choisit une taille suffisante : 99 + 99 = 198, donc PIC 999 est adapté.

Votre micro-exercice

Faites ces 3 modifications :

  1. Ajoutez une troisième saisie (WS-C) et ajoutez-la au total.
  2. Ajoutez un message d’erreur si la saisie vaut 00 (par exemple “Valeur nulle”).
  3. Affichez le total après chaque addition pour voir le cumul étape par étape.

Erreur fréquente à éviter

Choisir un total trop petit. Si vous mettez WS-TOTAL PIC 99 et que vous additionnez 90 + 90, vous dépassez 99 : selon l’environnement, vous risquez un résultat incorrect.

Autre piège : oublier d’initialiser le total à zéro, surtout dans des programmes plus longs. Pour apprendre, gardez l’habitude : “une variable de total commence à zéro”.

Conseil : testez avec des valeurs simples (01 + 02) puis des valeurs proches des limites (90 + 90) pour vérifier votre format.
Voir d’autres exemples dans l’index Retour accueil