1.
Apa yang anda ketahui tentang program
looping pada cobol?
Looping adalah Beberapa instruksi diulang untuk suatu jumlah pengulangan yang tertentu.
Jumlah pengulangan dapat diketahui sebelumnya atau ditentukan dalam perjalanan program.
Looping adalah Beberapa instruksi diulang untuk suatu jumlah pengulangan yang tertentu.
Jumlah pengulangan dapat diketahui sebelumnya atau ditentukan dalam perjalanan program.
2.
Tuliskan program looping pada cobol!
IDENTIFICATION DIVISION
PROGRAM-ID. ADDPROG.
AUTHOR. GROCER.
*ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 INPUT-AREA.
05 GET-ACCEPT-ANS PIC X VALUE SPACES.
05 FIRST-NUMBER PIC 999 VALUE 0.
05 SECOND-NUMBER PIC 999 VALUE 0.
05 ADD-ANS PIC 9999 VALUE 0.
PROCEDURE DIVISION.
MAINLINE.
DISPLAY "ENTER THE FIRST NUMBER (UNDER 1000)".
ACCEPT FIRST-NUMBER.
DISPLAY "ENTER THE SECOND NUMBER (UNDER 1000)".
ACCEPT SECOND-NUMBER.
ADD FIRST-NUMBER TO SECOND-NUMBER
GIVING ADD-ANS.
DISPLAY "THE ANSWER IS " ADD-ANS.
DISPLAY "PRESS ENTER TO END THE PROGRAM".
ACCEPT GET-ACCEPT-ANS.
STOP RUN.
3. Jelaskan jenis-jenis looping pada cobol yang kalian ketahui! SUBSTRACT Verb Digunakan untuk operasi pengurangan suatu nilai data numerik. MULTIPLY Verb Digunakan untuk mengalikan 2 nilai numerik dan menyimpan hasilnya. DIVIDE Verb Digunakan untuk membentuk statement operasi pembagian. COMPUTE Digunakan untuk operasi yang lebih rumit, untuk menyederhanakan 4 arithmatic verb sebelumnya. GO TO Verb Digunakan untuk alih kontrol tanpa syarat ke paragraph tertentu. GO TO … DEPENDING Verb Digunakan untuk alih kontrol bersyarat. Beralih pada paragraph tertentu dengan kondisi tertentu. ALTER Verb Digunakan untuk merubah arah tujuan proses dari statement GO TO yang telah ada di program. PERFORM Verb Digunakan untuk membuat suatu statement yang akan membawa proses dari program meloncat kesuatu paragraph, kemudian menjalankan seluruh statetement yang ada pada paragraph tersebut. Jika telah selesai akan kembali ke statement setelah PERFORM.
0 komentar:
Posting Komentar