LA INPUTAN ARRAY pada COBOL

Program Jumlah Inputan Array COBOL

SOAL!

1.       Jelaskan cara membuat program INPUTAN beberapa data yang nanti hasilnya langsung di hitung       nilai Jumlah dan Rata-Ratanya!

JAWAB!

1.   Kali ini kita akan buta Program array yang dimana jumlah Inputannya akan diseseuaika dengan keinginan kita, dan terdapat Jumlah dan Nilai Rata-ratanya.Berikut di bawah ini merupakan koddinganya.

Setelah koddingannya telah kita buat maka langkah selanjutnya saya akan menjelaskan mengenai logika dari koddingan di atas. Pada intinya program cobol diawali dengan penulisan program pada kolom ke 8 atau disebut dengan Area A. Judul divisi, judul section, nama paragraph, judul file description dan level number di mulai pada kolom ini. Penulisan pada program cobol menggunakan huruf besar dan harus diakhiri dengan tanda titik.IDENTIFICATION DIVISION statement ini sebagai Informasi tentang program. PROGRAM-ID. Tabel1 statement ini berfungsi sebagai pemberian nama jenis program, ditujukan untuk proses tabel. ENVIRONMENT DIVISION. Statement ini  berisi informasi computer yang digunakan dan input/output untuk memproses file.DATA DIVISION. Statemeni ini maksudnya adalah sebagai bagian isi dari data program yang diolah. WORKING-STORAGE SECTION. Statement ini berfungsi sebagai tempat atau nilai untuk hasil pengerjaan proses ke perhimpunan selanjutnya. n PIC 99 Pen-deklarasi-an variable n dengan type NUMERIC sebanyak 2 digit angka (99) begitupun dengan penjelasan di bawahnya untuk 77 itu hanya sebagai list number jadi bebas nilai berapa yang mau dipakai untuk dijadikan list number tersebut. Untuk VALUE 10 maksudnya adalah bernilai 10. 01 tabel-nilai-siswa maksudnya adalah statement ini sebagai level number 01  atau sebagai judul dari statatement di bawahnya yaitu 02 nilai-siswa pic 999 occurs 100 times maksudnya adalah label 02 bernilai nilai siswa dengan 3 digit angka yang dapat di cetak sebanyak 100 kali. SCREEN SECTION. Statement ini berfungsi untuk mendefinisikan bentuk dari layar untuk tampilan input data maupun hasil output. 01 hapus-layar. Statement ini berfungsi sebagai level number 01 dengan nama record hapus-layar. 02 BLANK SCREEN.maksud dari statement ini adalah sebagai level number 02 ditulis pada kolom 12 berisi perintah BLANK SCREEN untuk membersihkan layar sebagai  isi perintah dari record hapus-layar. 01 banyaknya. Maksud dari statement ini adalah menamai record banyaknya. 02 LINE 2 VALUE  ‘BANYAKNYA DATA : ‘. Maksud dari statement ini adalah level number 02 pada baris ke 2 berisi kotak input untuk Input Banyaknya Data.02 COLUMN PLUS 1 PIC 999 TO d. Maksud dari statement ini adalah level number 02 pada kolom 1 memiliki 3 digit angka dan dimasukan ke dalam variable b. PROCEDURE DIVISION. Statement ini berfungsi untuk menunjukan prosedur atau aturan dari instruksi yang mempunyai akibat secara langsung menghasilkan output yang diminta dari sejumlah input yang ada.Program-utama. merupakan label untuk memulai program-utama. DISPLAY banyaknya. berfungsi  untuk menampilkan label Inputan banyaknya data. ACCEPT banyaknya statement ini berfungsi untuk menerima input-an yang telah kita input di label banyaknya. DISPLAY SPACE. Maksudnya adalah untuk memberikan spasi.PERFORM pemasukan-nilai. Statement ini berfungsi sebagai instruksi untuk melompat ke paragraph pemasukan-nilai. VARYING n FROM 1 BY 1 UNTIL n > d. variasi bentuk nilai n dimulai dari 1 bertahap 1 langkah sampai nilai n lebih besar dari nilai variable d. PERFORM jumlah. Statement ini berfungsi sebagai instruksi untuk melompat ke paragraph jumlah. COMPUTE r = j / d. maksudnya adalah nilai r bernilai j dibagi d . DISPLAY ‘jumlah : ‘ , j. maksudnya adalah menampilkan hasil dari jumlah yang terdapat di variable j. STOP RUN. Untuk menghentikan program. Pemasukan-nilai-siswa ini merupakan label pemasukan-nilai-siswa yang di dalamnya terdapat DISPLAY ( , ) ‘Nilai : ‘ maksudnya adalah menampilakn Nilai yang sudah di inputkan. ACCEPT ( , ) nilai-siswa(n)  statement ini berfungsi untuk menerima input-an yang telah kita input di label nilai-siswa sebanyak variable n. COMPUTE j = j + nilai-siswa(n). maksdunya adalah sebagai statement perhitungan dimana j bernilai j ditambah dengan jumlah inputan yang bernilai n. Berikut di bawah ini merupakan hasil dari koddingannya.