Logika
IDENTIFICATION DIVISION= Berisi
informasi tentang program yang bersangkutan, nama pembuat program, tgl
pembuatan dll. Harus ada didalam program, tetapi isinya tidak mempengaruhi
jalannya/ proses dari program.
ENVIRONMENT DIVISION = dalam
program cobol sebagai divisi ke-2. Berisi dokumentasi informasi mengenai
peralatan yang dipergunakan.
DATA DIVISION = divisi ini
menjelaskan tentang input & output data yang digunakan serta semua
keterangan tentang file, record, nama data serta bentuk format yg akan
digunakan dalam PROCEDURE DIVISION.
WORKING-STORAGE SECTION =
Merupakan section yang berisi tentang record-description-entri yaitu penjelasan
tentang record program yang digunakan
Kemudian menginput pertanyaan
dengan pertanyaan memasukkan kode yang pada nantinya keluar dirunning
If jawab = “E” GO TO KODE-E dengan
maksud jika jawab E maka akan keluar output kode E ketika dirunning
Else go to salah dengan maksud
terkecuali kode “salah” akan keluar jika tidak ada kode yg sudah dimasukkan
Kemudian dimasukkan didalam kode
kode tersebut dengan jawaban jika kampus depok berada pada kode “D”
Kemudian jika dimasukkan kode
“salah” maka akan keluar output an “Inputan salah”
Logika
IDENTIFICATION
DIVISION= Berisi informasi tentang program yang bersangkutan, nama pembuat
program, tgl pembuatan dll. Harus ada didalam program, tetapi isinya tidak
mempengaruhi jalannya/ proses dari program.
ENVIRONMENT
DIVISION = dalam program cobol sebagai divisi ke-2. Berisi dokumentasi informasi
mengenai peralatan yang dipergunakan.
DATA DIVISION
= divisi ini menjelaskan tentang input & output data yang digunakan serta
semua keterangan tentang file, record, nama data serta bentuk format yg akan
digunakan dalam PROCEDURE DIVISION.
WORKING-STORAGE
SECTION = Merupakan section yang berisi tentang record-description-entri yaitu
penjelasan tentang record program yang digunakan
77 x pic 999
maksudnya memasukkan numeric minimal pada program tersebut dengan 3 digit
77 y pic 99
numeric minimal pada variabel “Y” dengan 2 digit
SCREEN SECTION untuk lanjutan tahapan program untuk membuka layar baru
CLS untuk membersihkan layar
BLANK SCREEN sebagai lanjutan tahapan program
Display ‘Program cetak teks’ inputan pada judul program
Display ‘Masukkan nilai perulangan: ‘. Inputan untuk memasukkan nilai
perulangan
Accept X untuk menyetujui variabel X
Perform hitung varying Y from 1 by 1 until Y > X yaitu jika variabel
y dimulai dari satu kemudian berjalan ditambah 1 sampai variabel y terpenuhi
oleh variabel x
Kemudian Hitung untuk memproses hasil yg sudah kita masukkan
Tidak ada komentar:
Posting Komentar