IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO-WORLD.

ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT INPUT ASSIGN TO 'input.txt'
ORGANIZATION SEQUENTIAL.
SELECT OUTPUT ASSIGN TO 'output.txt'
ORGANIZATION SEQUENTIAL.

DATA DIVISION.
FILE SECTION.
FD INPUT.
01 RECORD-INPUT.
02 FIELD-1 PIC X(80).

FD OUTPUT.
01 RECORD-OUTPUT.
02 FIELD-1 PIC X(80).

WORKING-STORAGE SECTION.
01 MSG-1.
02 FIELD-1 PIC X(80) VALUE 'Привет, мир!'.

PROCEDURE DIVISION.
MAIN-PARAGRAPH.
OPEN INPUT INPUT
OPEN OUTPUT OUTPUT
PERFORM READ-INPUT UNTIL END-OF-INPUT
CLOSE INPUT
CLOSE OUTPUT
STOP RUN.

READ-INPUT.
READ INPUT
AT END
MOVE ' ' TO FIELD-1
PERFORM WRITE-OUTPUT
END-READ.

WRITE-OUTPUT.
WRITE RECORD-OUTPUT
END-WRITE.

END PROGRAM HELLO-WORLD.