Contoh Program Cobol - 2 Kondisi

Program ini saya ambil dari Sumber nya, Lalu saya coba edit dengan memiliki 2 kondisi.

Penjelasan:

1) anda ketikan code yang wajib ada dalam Cobol (identification, programID, environmene. dsb).

2) 77 JAWAB & 77 LAAGI adalah suatu level number ke 77 dan suatu variabel character.

guna nya untuk memberikan tempat penyimpanan yang kita input. ex; ACCEEPT JAWAB = berarti kita menginput dan disimpan di variabel JAWAB.

3) DISPLAY 'MASUKAN ID ANDA [A/B/C].
    ACCEPT JAWAB. artinya anda akan menginput suatu nilai caharakter(huruf) ke dalam variabel JAWAB.

4) IF JAWAB = 'A' go to ID-A. karna anda menginput 'A' maka program akan mengarah (go to) ke ID-A yang akan men(Display 'anda angkatan 1'). gunakan tanda string('').

5) anda tinggal memahami maksud kondisi LAAGI sama seperti diatas(no3).