IDENTIFICATION DIVISION.
        PROGRAM-ID. SAMPLE.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        01 n PIC Z9.
        01 THE-NUMBERS.
                10 FILLER USAGE IS COMP-1 VALUE -.24093455E+04.
                10 FILLER USAGE IS COMP-1 VALUE -.55439209E-47.
                10 FILLER USAGE IS COMP-1 VALUE  .44591240E+13.
                10 FILLER USAGE IS COMP-1 VALUE -.22818252E-71.
                10 FILLER USAGE IS COMP-1 VALUE -.48936378E-36.
                10 FILLER USAGE IS COMP-1 VALUE  .53763199E+00.
                10 FILLER USAGE IS COMP-1 VALUE  .23808258E+74.
                10 FILLER USAGE IS COMP-1 VALUE -.13901026E-68.
                10 FILLER USAGE IS COMP-1 VALUE -.54452280E-53.
                10 FILLER USAGE IS COMP-1 VALUE -.33187504E+05.
                10 FILLER USAGE IS COMP-1 VALUE  .84218729E+00.
                10 FILLER USAGE IS COMP-1 VALUE -.18465549E-73.
                10 FILLER USAGE IS COMP-1 VALUE -.16025044E-50.
        01 THE-ANSWER REDEFINES THE-NUMBERS PIC X(52).
        PROCEDURE DIVISION.
                DISPLAY THE-ANSWER
		STOP RUN.