Rabu, 03 Desember 2014

COBOL


Hai, kali ini saya akan membahas tentang cobol. COBOL (singkatan dari Common Business Oriented Language) adalah sebuah bahasa pemrograman generasi ketiga. Sesuai dengan namanya, maka bahasa COBOL mempunyai fungsi menyelesaikan masalah-masalah yang berhubungan dengan perdagangan, seperti sistem pengelolaan keuangan, laporan pengeluaran sebuah perusahaan dan lain-lain. Dikembangkan tahun 1959 dan banyak digunakan pada mainframe dan komputer mini.

Kali ini saya akan membuat program penjumlahan serta pengurangan pada cobol
Untuk penjumlahan ini lah listing programnya

Penjumlahan cobol
IDENTIFICATION DIVISION
PROGRAM­ID. Hitung.
AUTHOR. 2IA05.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING­STORAGE SECTION.
77 nilai1 PICTURE IS 99.
77 nilai2 PICTURE IS 99.
77 hasil PICTURE IS 999.
PROCEDURE DIVISION.
PROGRAM-BEGIN.
    DISPLAY “ masukkan nilai 1 : “.
    ACCEPT nilai1.
    DISPLAY “ masukkan nilai 2 : “.
    ACCEPT nilai2.
    COMPUTE hasil = nilai1 + nilai2.
    DISPLAY “ masukkan hasil : “.
    DISPLAY hasil.
PROGRAM-DONE.
    STOP RUN.



Untuk pengurangan inilah listing programnya
IDENTIFICATION DIVISION
PROGRAM­ID. Hitung.
AUTHOR. 2IA05.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING­STORAGE SECTION.
77 nilai1 PICTURE IS 99.
77 nilai2 PICTURE IS 99.
77 hasil PICTURE IS 999.
PROCEDURE DIVISION.
PROGRAM-BEGIN.
    DISPLAY “ masukkan nilai 1 : “.
    ACCEPT nilai1.
    DISPLAY “ masukkan nilai 2 : “.
    ACCEPT nilai2.
    COMPUTE hasil = nilai1 - nilai2.
    DISPLAY “ masukkan hasil : “.
    DISPLAY hasil.
PROGRAM-DONE.
    STOP RUN.

Tidak ada komentar:

Posting Komentar