IDENTIFICATION DIVISION.
PROGRAM-ID. DEMO-DISPLAY.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NOM-FORMATION PIC X(30) VALUE "Micro-learning COBOL".
PROCEDURE DIVISION.
       DISPLAY "Bonjour le monde COBOL!".
       DISPLAY "Formation: " WS-NOM-FORMATION.
       STOP RUN.