cobol-interpreter-lab/lab-5/samples/branching.cbl

10 lines
196 B
COBOL

IDENTIFICATION DIVISION.
PROGRAM-ID. BRANCHING.
PROCEDURE DIVISION.
IF A > B THEN
DISPLAY 'A is greater than B'
ELSE
DISPLAY 'B is greater than A'
END-IF
STOP RUN.