ACCEPT
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 NAME PIC X(10).
PROCEDURE DIVISION.
MAIN SECTION.
DISPLAY "what's your name?".
ACCEPT NAME. *> 「ACCEPT」 -> 入力を「NAME」へ代入
DISPLAY "hello! " NAME. *> スペースで文字列連結
STOP RUN.
実行
USER-no-MacBook-Air:COBOL user$ ./hello
what's your name?
ueda *> 入力
hello! ueda