Index alphabétique des mots-clés COBOL
Sélectionnez une lettre pour afficher les mots-clés correspondants :
Ce système d'index vous permet d'accéder rapidement aux définitions des mots-clés COBOL, classés par ordre alphabétique. Lorsque l'on débute en programmation, il est fréquent de rencontrer des notions inconnues. Grâce à cet index, il vous suffit de cliquer sur une lettre pour explorer les termes correspondants, sans avoir à faire défiler l’ensemble du cours. Cela vous fera gagner un temps précieux et rendra votre apprentissage plus fluide et plus efficace.
COMPUTE : une instruction pour les calculs arithmétiques complexes
En COBOL, l’instruction COMPUTE permet d’effectuer des calculs plus complexes que
les instructions arithmétiques classiques (ADD, SUBTRACT, MULTIPLY, DIVIDE).
Elle permet d’utiliser des expressions combinant plusieurs opérateurs.
Utilisation générale
Syntaxe simple :
COMPUTE destination = expression.
L’expression peut contenir des additions, soustractions, multiplications, divisions,
et même des parenthèses pour structurer les priorités.
Exemple simple
01 A PIC 9(3) VALUE 10.
01 B PIC 9(3) VALUE 5.
01 RESULTAT PIC 9(4).
COMPUTE RESULTAT = A + B.
Ce code additionne les valeurs de A et B, puis stocke le résultat dans RESULTAT.
Exemple avec expression complexe
COMPUTE RESULTAT = (A + B) * 2.
Dans cet exemple, la parenthèse force l’addition à être effectuée en premier, puis le résultat est multiplié par 2.
Exemple complet
IDENTIFICATION DIVISION.
PROGRAM-ID. COMPUTE-EXEMPLE.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NOTE1 PIC 9(2) VALUE 15.
01 WS-NOTE2 PIC 9(2) VALUE 17.
01 WS-NOTE3 PIC 9(2) VALUE 18.
01 WS-MOYENNE PIC 9(3)V9(2).
PROCEDURE DIVISION.
COMPUTE WS-MOYENNE = (WS-NOTE1 + WS-NOTE2 + WS-NOTE3) / 3.
DISPLAY "Moyenne : " WS-MOYENNE.
STOP RUN.
Ce programme calcule la moyenne de trois notes et affiche le résultat. L’utilisation de COMPUTE
simplifie l’opération en une seule ligne.
Remarques
-
COMPUTEpeut contenir des opérateurs comme+,-,*,/, et des parenthèses. - Le type de la variable de destination doit être compatible avec le résultat (y compris la gestion des décimales si nécessaire).
-
Pour éviter les divisions par zéro, ajoutez des conditions de contrôle avec
IF.