Selasa, 29 September 2009

contoh program cobol

contoh program sederhana cobol yang telah saya buat :


IDENTIFICATION DIVISION.

AUTHOR. wiendy_pratama.

ENVIRONMENT DIVISION.

DATA DIVISION.

01 NAMA PIC A(20).

01 KELAS PIC B(5).

01 NPM PIC C(10)

PROCEDURE DIVISION.

MULAI.

DISPLAY "NAMA :".

ACCEPT NAMA.

DISPLAY "KELAS :".

ACCEPT KELAS.

DISPLAY "NPM :".

ACCEPT NPM.

SCREEN SECTION.

01 ACCEPT NAMA.

01 ACCEPT KELAS.

01 ACCEPT NPM.

SELESAI.

STOP RUN.