Membuat program looping pada cobol menggunakan perform

            ketik coddingan ini kedalam notepad lalu save dengan namafile .cob atau bisa
            langsung menggunakan command prompt dengan cara edit namafile.cob

             IDENTIFICATION DIVISION . 

             PROGRAM-ID. LATIH-1. 

             AUTHOR. AKBAR. 

             ENVIRONMENT DIVISION.

             DATA DIVISION. 

             WORKING-STORAGE SECTION. 

             01 NILAI-MASUKKAN. 

             02 NAMA PIC X(20). 

             SCREEN SECTION. 

             01 CLS. 

             02 BLANK SCREEN. 

             PROCEDURE DIVISION. 

             MULAI.

             DISPLAY CLS. 

             PERFORM PROCEDURE-A 3 TIMES. 

             PERFORM PROCEDURE-B 5 TIMES. 

             PERFORM PROCEDURE-A 3 TIMES. 

             STOP RUN. 

             PROCEDURE-A. 

             DISPLAY '^^^^^^^^^^^^^^^^'. 

             PROCEDURE-B. 

             DISPLAY 'YEAAAA, I CAN DO IT' . 

   

             SELAMAT MENCOBAA ..