fork download

   IDENTIFICATION DIVISION. (FÁCIL)
      PROGRAM-ID. ARITMETICA.
      DATA DIVISION.
      WORKING-STORAGE SECTION.
 
      01  VARIAVEL.
        05 A          PIC 9(01) VALUE 5.
        05 B          PIC 9(01) VALUE 3.
        05 A-B        PIC 9(01) VALUE 1.
*       05 A+B        PIC 9(01) VALUE 4.
        05 RESULTADO  PIC 9(01) VALUE 0.
 
     PROCEDURE DIVISION.
 
       COMPUTE RESULTADO = A       
         DISPLAY 'A = ' RESULTADO
 
       COMPUTE RESULTADO = B       
         DISPLAY 'B = ' RESULTADO
 
       COMPUTE RESULTADO = A-B     
         DISPLAY 'A-B = ' RESULTADO 
 
       COMPUTE RESULTADO = A – B
         DISPLAY 'A - B = ' RESULTADO
 
*      COMPUTE RESULTADO = A+B
*        DISPLAY 'A+B = ' RESULTADO
 
       COMPUTE RESULTADO = A + B
         DISPLAY 'A + B = ' RESULTADO 
 
     GOBACK.

prog.cob:1: Warning: Invalid indicator 'N' at column 7
prog.cob:4: Warning: Invalid indicator '0' at column 7
prog.cob:11: Warning: Invalid indicator 'R' at column 7
prog.cob:31: Warning: File not terminated by a newline
prog.cob:31: Warning: Invalid indicator 'O' at column 7
prog.cob:1: Error: syntax error, unexpected WORD, expecting PROGRAM_ID

Standard output is empty