COBOLIDENTIFICATION DIVISION.PROGRAM-ID. USER-INPUT.ENVIRONMENT DIVISION.DATA DIVISION.WORKING-STORAGE SECTION. 01 WEBSITE-NAME PIC X(50).PROCEDURE DIVISION.DISPLAY"Quel est ton site ?".ACCEPTWEBSITE-NAME.DISPLAYWEBSITE-NAME.STOP RUN.
DISPLAY affiche une question à l'utilisateur : "Quel est ton site ?"
ACCEPT lit la réponse de l'utilisateur et la stocke dans la variable WEBSITE-NAME.
DISPLAY montre ensuite la valeur saisie, ici "Pacta Cobol".
Cette simulation aide les débutants à comprendre la saisie et l'affichage de variables en COBOL de manière simple.