Add Two Numbers

   IDENTIFICATION DIVISION.
   PROGRAM-ID. ADD-NUMBERS.

   DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 NUM1     PIC 9(3) VALUE 25.
   01 NUM2     PIC 9(3) VALUE 30.
   01 SUM      PIC 9(4).

   PROCEDURE DIVISION.
   ADD NUM1 TO NUM2 GIVING SUM.
   DISPLAY "THE SUM IS: " SUM.
   STOP RUN.</code></pre>


Explanation:



WORKING-STORAGE SECTION → used to declare variables.



01 NUM1 PIC 9(3) → variable with 3 digits (e.g., 025).



ADD NUM1 TO NUM2 GIVING SUM → performs addition.



DISPLAY → shows result.



Output:

THE SUM IS: 55