Program Input Data Mahasiswa

Okelah, sekarang adalah tentang program input data mahasiswa yang sudah ditunggu-tunggu oleh agan-agan / sista-sista semua haha.

pertama - tama ketik dahulu program yang ada dibawah ini :

        IDENTIFICATION DIVISION.

        PROGRAM-ID. data-mahasiswa.

        ENVIRONMENT DIVISION.

        DATA DIVISION.

        WORKING-STORAGE DIVISION.

        01 input-data.

                02 nama PIC A (20).

                02 kelas PIC X (5).

                02 npm PIC 9(8).

        SCREEN SECTION.

        01 hapus-layar.

                49 BLANK SCREEN.

        PROCEDURE DIVISION.

        mulai.

                DISPLAY ( 1 , 1 ) 'masukan nama : '.

                ACCEPT nama.

                DISPLAY ( 2 , 1 ) 'masukan kelas : '.

                ACCEPT kelas.

                DISPLAY ( 3 , 1 ) 'masukan npm : '.

                ACCEPT npm.

                DISPLAY hapus-layar.

                DISPLAY '       data mahasiswa'.

                DISPLAY 'nama : ',nama.

                DISPLAY 'kelas : ',kelas.

                DISPLAY 'npm : ',npm.

       selesai.

                STOP RUN.


Ketentuan dalam penulisan pada bahasa pemograman COBOL ini harus sesuai dengan kolomnya masing - masing. pada rata kiri seperti IDENTIFICATION DIVISION, PROGRAM -ID. dan lain- lain. itu diketik pada kolom 8, sedangkan yang agak melonjong ke kanan diketik pada kolom 12 seperti DISPLAY, ACCEPT, dan lain - lain.

Setelah mengetik program diatas, silahkan di save dulu, lalu di compile dan dijalankan dengan ketentuan pada postingan saya dahulu di Syntax pada COBOL. untk logikanya akan menyusul pada postingan berikutnya.. selamat mencoba dan tetap berkreatifitas..

      

Categories: COBOL