From 2f2f5a4db8af80834d24abdd971c0791570c1f3e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=E1=98=A1=CB=9A?= <0x0001F36D@gmail.com> Date: Mon, 10 Dec 2018 02:02:01 +0800 Subject: [PATCH] (Cobol) eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee --- e.cbl | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 e.cbl diff --git a/e.cbl b/e.cbl new file mode 100644 index 0000000..4c4fe46 --- /dev/null +++ b/e.cbl @@ -0,0 +1,14 @@ +IDENTIFICATION DIVISION. + PROGRAM-ID. eeeeeeeee. + +DATA DIVISION. + WORKING-STORAGE SECTION. + 01 e PIC X VALUE 0. + +PROCEDURE DIVISION. + MAIN-PROCEDURE. + PERFORM UNTIL e > e + DISPLAY 'e' + END-PERFORM. + STOP RUN. +