Sunday, November 29, 2009

Contoh Program COBOL sederhana

IDENTIFICATION DIVISION.
AUTHOR. RIDHO_KURNIAWAN.
ENVIRONMENT DIVISION.
DATA DIVISION.
01 NAMA PIC A(20).
01 KELAS PIC B(5).
PROCEDURE DIVISION.
MULAI.
DISPLAY "NAMA :".
ACCEPT NAMA.
DISPLAY "KELAS :".
ACCEPT KELAS.
SCREEN SECTION.
01 ACCEPT NAMA.
01 ACCEPT KELAS.
SELESAI.
STOP RUN.

2 comments:

  1. ko lurus semua mas?
    emang bisa jalan kalo begitu?

    ReplyDelete
  2. wkwkw pake kolom atu lurus smua.. eror tar

    ReplyDelete