5 lines
130 B
COBOL
5 lines
130 B
COBOL
IF FUNCTION REM(Num, 2) = 0
|
|
DISPLAY Num " is even."
|
|
ELSE
|
|
DISPLAY Num " is odd."
|
|
END-IF
|