Index alphabétique des mots-clés COBOL

Sélectionnez une lettre pour afficher les mots-clés correspondants :

0-9 A B C D E F G H I J K L M N O P Q R S T U V W X Y Z Autres

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.

DIVIDE : une instruction arithmétique pour la division

En COBOL, l’instruction DIVIDE permet d’effectuer une division entre deux valeurs numériques. Elle permet de diviser un dividende par un diviseur, avec possibilité de stocker le résultat et éventuellement le reste.

Utilisation générale

Syntaxe simple :


DIVIDE diviseur INTO dividende.

Cette instruction effectue l’opération dividende / diviseur, et le résultat est stocké dans dividende. Attention : la syntaxe INTO inverse l’ordre mathématique.

Forme recommandée avec GIVING


DIVIDE dividende BY diviseur GIVING resultat.

Cette forme est plus intuitive et évite de modifier les variables d’origine. Le résultat est stocké dans resultat.

Exemple simple


01 A                PIC 9(3) VALUE 100.
01 B                PIC 9(2) VALUE 5.
01 R                PIC 9(3).

DIVIDE A BY B GIVING R.

Ce code divise 100 par 5 et stocke le résultat 20 dans R.

Utilisation avec REMAINDER

Il est possible de récupérer également le reste de la division avec REMAINDER : 


DIVIDE A BY B GIVING R REMAINDER RESTE.

Cela permet de stocker à la fois le quotient dans R et le reste de la division dans RESTE.

Exemple complet


IDENTIFICATION DIVISION.
PROGRAM-ID. DIVIDE-EXEMPLE.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NOMBRE              PIC 9(4) VALUE 47.
01 WS-DIVISEUR           PIC 9(2) VALUE 5.
01 WS-RESULTAT           PIC 9(4).
01 WS-RESTE              PIC 9(2).

PROCEDURE DIVISION.
DIVIDE WS-NOMBRE BY WS-DIVISEUR GIVING WS-RESULTAT REMAINDER WS-RESTE.
DISPLAY "Résultat : " WS-RESULTAT.
DISPLAY "Reste : " WS-RESTE.
STOP RUN.

Ce programme divise 47 par 5. Le résultat 9 est stocké dans WS-RESULTAT, et le reste 2 dans WS-RESTE.

Remarques

  • La forme avec GIVING est conseillée pour une meilleure lisibilité et un contrôle du résultat.
  • Veillez à ce que le diviseur ne soit jamais égal à zéro, au risque de provoquer une erreur à l’exécution.
  • Pour les divisions décimales, utilisez une définition adaptée dans la clause PIC avec des V pour la partie décimale.