10 lines
202 B
COBOL
10 lines
202 B
COBOL
IDENTIFICATION DIVISION.
|
|
PROGRAM-ID. Spam.
|
|
|
|
PROCEDURE DIVISION.
|
|
PERFORM UNTIL 1 <> 1
|
|
DISPLAY "SPAM"
|
|
END-PERFORM
|
|
|
|
GOBACK
|
|
.
|