program2.cbl

来自「cobol大机操作语言的历程」· CBL 代码 · 共 10 行

       IDENTIFICATION DIVISION.

       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       PROCEDURE DIVISION.
           DISPLAY 'SOURCE PRICE:'.
           DISPLAY 'REAL PRICE:'.
           STOP RUN.