MEMBUAT PROGRAM COBOL GRADE.


















-          Pertama-tama buka Aplikasi Cobol mengunakan command prompt setelah masuk pada Aplikasi Cobol ketikan codingan program grade seperti gambar diatas.
-          Setelah itu saya akan menjelaskan codingan diatas : IDENTIFICATION DIVISION.  Dilihat dari nama divisinya divisi ini berfungsi sebagai pengidentifikasi program cool yang  kita buat.
-           PROGRAM-ID. GRADE. Untuk menampilkan Judul program yang kita buat.
-           AUTHOR. RYAN Untuk menampilkan nama pembuat program
-           DATA DIVISION  Divisi ini berfungsi sebagai pendeskripsian variabel-variael dn jenis tipe-        tipe data yang digunakan dalam program cobol
-          WORKING-STORAGE SECTION.
-           01 NAMA PIC A(20). Untuk menampilkan nama maksimal panjang 20 karakter
-           01 NPM PIC 9(8). Untuk menampilkan karakter numerik maksimal 8 karakter
-           01 UTS PIC 9(2). Untuk menampilkan karakter numerik maksimal 2 karakter
-           01 UAS PIC 9(2). Untuk menampilkan karakter numerik maksimal 2 karakter
-           01 TOTAL PIC 9(3). Untuk menampilkan karakter numerik maksimal 3 karakter
-           SCREEN SECTION.
-           01 MASUKKAN.
-           02 LINE 5 COLUMN 3 VALUE 'NAMA :'. Mencetak nama pada baris ke 5 kolom 3
-           02 COLUMN PLUS 1 PIC A(20) TO NAMA.Kolom plus 1 mencetak panjang karakter nama maks 20 karakter
-           02 LINE 7 COLUMN 3 VALUE 'NPM :'. Mencetak NPM pada baris ke 7 dan kolom ke 3
-           02 COLUMN PLUS 1 PIC 9(8) TO NPM.Kolom plus 1 mencetak karakter num maks 8 karakter
-           02 LINE 9 COLUMN 3 VALUE 'NILAI UTS :'. Mencetak UTS pada baris ke 9 kolom 3
-           02 COLUMN PLUS 1 PIC 9(2) TO UTS. Kolom plus 1 mencetak karakter num maks 2 karakter
-           02 LINE 11 COLUMN 3 VALUE 'NILAI UAS :'. Mencetak Nilai UTS pada baris 11 kolom 3
-           02 COLUMN PLUS 1 PIC 9(2) TO UAS.Kolom plus 1 mencetak karakter num maks 2 karakter
-           01 GRADE-A.
-           02 LINE 15 COLUMN 3 VALUE 'GRADE A.'. Mencetak Grade A pada baris 15 kolom 3
-           01 GRADE-B.
-           02 LINE 15 COLUMN 3 VALUE 'GRADE B.'. Mencetak Grade B pada baris 15 kolom 3
-           01 GRADE-C.
-           02 LINE 15 COLUMN 3 VALUE 'GRADE C.'. Mencetak Grade C pada baris 15 kolom 3
-           01 GRADE-D.
-           02 LINE 15 COLUMN 3 VALUE 'GRADE D.'. Mencetak Grade D pada baris 15 kolom 3
-           01 GRADE-E.
-           02 LINE 15 COLUMN 3 VALUE 'GRADE E.'. Mencetak Grade E pada baris 15 kolom 3
-           PROCEDURE DIVISION. Divisi pemuatan statement pada cobol
-           MULAI.
-           DISPLAY MASUKKAN. Penginputan
-           ACCEPT MASUKKAN.Output
-           DISPLAY ' '.
-           COMPUTE TOTAL = (0.3 * UTS) + (0.7 * UAS). Perhitungan untuk mencari total
-           IF TOTAL > 89 apabila nilai total lebih dari 89
-           DISPLAY GRADE-A.Mencetak grade A
-           IF TOTAL < 89 AND TOTAL > 79 Apabila nilai total lebih kecil dari 89/ lebih besar dari 79
-           DISPLAY GRADE-B.Mencetak grade B
-           IF TOTAL < 79 AND TOTAL > 69 Apabila nilai total lebih kecil dari 79/lebih besar dari 69
-           DISPLAY GRADE-C.Mencetak grade C
-           IF TOTAL < 69 AND TOTAL > 59 Apabila nilai total lebih keci dari 69/leih besar dari 59
-           DISPLAY GRADE-D.Mencetak grade D
-           IF TOTAL < 59 Apabila nilai total lebih kecil dari 59
-           DISPLAY GRADE-E.Mencetak E
-           SELESAI.
-           STOP RUN. Untuk menghentikan program
-          Jika  sudah mngetik program grade seperti gambar diatas run setelah itu save lalu comfile kemudian jika no error runcobol maka akan menghasilkan output seperti gambar dibawah.


OUTPUT.


Komentar

Posting Komentar

Postingan populer dari blog ini

TUGAS 3 SOFTSKILL BAB 28-30

TUGAS 3 28. MANAJEMEN PENGOPERASIAN IT PENGENALAN DAN RUANG LINGKUP Manajemen pengoperasian IT adalah sebuah fungsi bukan sebuah proses. Bertanggung jawab untuk mengoperasikan infrastruktur organisasi IT dan apliaksi dari hari ke hari. Infrastruktur IT dan aplikasi mendukung pelayanan dari organisasi. TUJUAN DAN PENCAPAIAN Mendistribusikan pelayanan yg stabil dengan meminimalisir ketidaktersediaan adalah pencapaian utama. Manajemen operasi IT adalah fungsi yg memastikan bahwa semua infrastruktur organisasi IT dan aplikasi dikelola dan dipelihara setiap hari. Untuk mengantarkan kesepakatan untuk pelayanan. AKTIFITAS UTAMA Manajemen pengoperasian IT dibuat menjadi 2 bagian : ·          Kontrol Pengoperasian  : Bertanggung jawab untuk membawa aktifitas operasional harian. Ini termasuk mengawasi infrastruktur IT dan aplikasi dan menanggapi kejadian, insiden dan permasalahan. Tugas yg lebih khusus termasuk penjadwalan p...
Baca selengkapnya

Pengertian Manajemen Layanan Sistem Informasi dan contoh Framework

Manajemen Layanan Sistem Informasi atau biasa disebut IT Service Management (ITSM) adalah istilah umum untuk menggambarkan pendekatan untuk merancang, menghasilkan, mengelola dan meningkatkan penggunaan teknologi informasi yang digunakan dalam suatu perusahaan. Tujuan dari maajeme layana sistem informasi untuk memastikan bahwa semua proses, sumber daya manusia dan teknologi berada pada tempat/berjalan dengan benar sehingga organisasi dapat mencapai tujuan bisnisnya. ITSM adalah proses layanan bisnis dengan tujuan utama pada pelayanan terbaik kepada konsumen. ITSM dibuat untuk mengukur sebuah proses dengan memberikan sebuah solusi kepada konsumen daripada hal teknis seperti development. ITSM mengukur efisiensi operasional dalam memberikan solusi dan bagaimana mengelola sistem ini agar memenuhi harapan yang diinginkan. Contoh fFramework pada ITSM adalah : 1. ITIL (Information Technology Infrastructure Library) Merupakan sebuah konsep dan teknik ...
Baca selengkapnya
Gambar
Membuat Tabel Distirbusi Frekuensi Pada R Program. Pertama-tama kita buka Program R, Setelah masuk pada Program R setelah itu tekan CTRL L untuk membersihkan Layar pada Program . Berikut langkah-langkah membuat Tabel Distribusi Frekuensi : 1.        Pertama  Ketik data seperti gambar dibawah : -           Pada codingan diatas > a = c(41,42,43,...67$ dimana Jumlah Data disimpan di dalam variabel a. Lalu tulis > a = Lalu klik enter dan akan muncul urutan data seperti gambar diatas. Lalu sebelum kita membuat  Tabel Distribusi Frekuensi kita harus mencari : -           Sort ( Urutan data) , Length (Mencari data tunggal), Max (Mencari nilai data yang terbesar), Min ( Mencari nilai data yang terkecil), Jangkauan, Jumlah Kelas. -           Untuk Mengurutkan data dari yang terkecil hingga yang terbes...
Baca selengkapnya