Logo 
Search:

Cobol Articles

Submit Article
Home » Articles » Cobol » Homework HelpRSS Feeds

Program to use multiple array

Posted By: Ada Fischer     Category: Cobol     Views: 11127

Program to use multiple array.

Code for Program to use multiple array in Cobol

       IDENTIFICATION DIVISION.
         PROGRAM-ID. ARR.
       DATA DIVISION.
        01 ARR1.
          02 A OCCURS 3 TIMES.
            03 A1 OCCURS 3 TIMES.
              05 TEMP PIC  99.
        01 I PIC 9.
        01 J PIC 9.
       PROCEDURE DIVISION.
        BEGIN.
          PERFORM VARYING I FROM 1 BY 1 UNTIL I>3
            PERFORM VARYING J FROM 1 BY 1 UNTIL J>3
              ACCEPT TEMP (I,J)
            END-PERFORM
          END-PERFORM.
          PERFORM VARYING I FROM 1 BY 1 UNTIL I>3
            PERFORM VARYING J FROM 1 BY 1 UNTIL J>3
              DISPLAY TEMP (I,J) WITH NO ADVANCING
            END-PERFORM
              DISPLAY " "
          END-PERFORM.
         STOP RUN
  
Share: 


Didn't find what you were looking for? Find more on Program to use multiple array Or get search suggestion and latest updates.

Ada Fischer
Ada Fischer author of Program to use multiple array is from Frankfurt, Germany.
 
View All Articles

 
Please enter your Comment

  • Comment should be atleast 30 Characters.
  • Please put code inside [Code] your code [/Code].

 
No Comment Found, Be the First to post comment!