Ini adalah program looping pada cobol.
Kemudian
disini saya akan menjelaskan beberapa program di atas tersebut.
Ø
IDENTIFICATION
DIVISION : untuk mengidentifikasikan
pada pembuatan program.
Ø
PROGRAM-ID
: untuk memberikan judul program apa yang akan kita buat.
Ø
ENVIRONMENT
DIVISION : itu adalah computer atau
alat apa yang kita gunakan dalam membuat program tersebut.
Ø
DATA
DIVISION : untuk informasi jenis data yang akan kita gunakan pada
programnya.
Ø
WORKING-STORAGE
SECTION : dimana program itu akan diolah.
Ø
77 A PIC
9 : untuk mendeklarasikan Variable “A” menjadi type data numerik.
Ø
77 B PIC
9 : untuk mendeklarasikan Variable “B” menjadi type data numerik.
Ø
PROCEDURE
DIVISION : untuk memuat procedure pemrosesan data. Yang berisi paragraph – paragraph yang terdiri dari
instruksi untuk pelaksanaan program.
Ø
MULAI :
untuk memulai membuat program.
Ø
PERFORM
CETAK : untuk menampilkan Cetak.
Ø
VARYING A
FROM 1 BY 1 UNTIL A>5 : pada bagian ini untuk
melakukan Perulangan untuk varying A
dari 1 by 1 sampai A lebih besar dari pada 5.
Ø
AFTER B
FROM 1 BY 1 UNTIL B>A :
pada bagian ini untuk melakukan perulangan setelah B dari 1 by 1 sampai B lebih besar
dari A.
Ø
STOP RUN
: untuk memberhentikan
program.
Ø
CETAK : untuk mencetak hasil dari proses
perulangannya.
Ø
DISPLAY
(, ) A : untuk menampilkan
hasil output pada Variable A.
Ø
IF B = A
DISPLAY SPACE : jika B sama
dengan A kemudian terdapat display space maka dari itu program akan membuat
baris baru dibawahnya karena statement pada perulangannya sudah terpenuhi maka
otomatis dia akan “Display Space”.
Ini
adalah outputnya.
~Semoga Bermanfaat~
Tidak ada komentar:
Posting Komentar