Membuat program Looping pada cobol

Langkah-langkahnya sebagai berikut:

a.       Seperti biasa buka directori COBOL pada command prompt, beri nama “nama.cob”

b.      Buatlah program seperti dibawah ini:

Dengan logika

Beberapa statement sudah dibahas 2 pertemuan sebelumnya,maka sudah jelas dan kita langsung saja

Pada 01 DATAA.  Statement-satement tersebuat menyatakan bahwa NILAI dan NILAI1 mengandung 2digit karakter dengan jumlah nilai 0-9, dengan i dan j memiliki 2 digits pula.

Pada MULAI dan CETAK saya gambarkan logikanya seperti ini:

i from 1 by 1	i >nilai 1	pernyataan	cetak?	enter
0	0>1	salah		-
j from 1 by 1	j>i
0+1	1>1	benar	cetak	beri space (enter)
i from 1 by 1	i >nilai 1	pernyataan	cetak?	Enter
0	0>1	salah		-
1	1>1	benar	cetak
j from 1 by 1	j>i
0+1	1>1	benar
1+1	2>1	benar	cetak	beri space (enter)

Dan seterusnya hingga value 10

c.       Save program, lalu compile dengan cobol “nama”.cob

d.      Run program dengan runcobol “nama”.cob dan hasil yang akan tertampil sbb: