program cobol

- Januari 21, 2018

Pertama kita masukkan :

• Identification division: sebuah keterangan program yang kita buat

• Program-ID: untuk judul program

• Environment division: untuk memberikan informasiperalatan yg digunakan

• Data division: untuk mendeskripsikan tipe data dan variablenya

• Working-storage: untuk mendeklarasikan variable danjenis data yg akan digunakan

• Screen section: untuk mengatur format layarinput/output

Pertama kita buat dulu 01 operand untuk mengawali keterangandari record pertama, lalu 77 I pic 9 berarti variable I pic bertipenumeric, seterusnya sampai 77 N pic 9, lalu kita buat pil untukmenggunakan tipe data numeric, seterusnya sampai 02 nilai pic 9, lalu cls untuk memanggil output/ menampilkannya, dan blank screen untuk membersihkan layar.

Lalu kita buat untuk outputnya display cls menu, biodata, nilaiakhir, perulangan, dan exit lalu display space untuk memberikanspace, dan display masukkan pilihan anda dan accept pil yaituuntuk memberikan kita kesempatan untuk memilih dari program menu yang kita mau dan dia bertipe numeric, lalu goto men1 sampai men4 depending on pil, lalu stop untuk pilihan yang tidak ada pada output seperti 5, lalu kita masuk pada go to menu nya yaitu men1, kita buat program biodata dan kita hanya buatprogram ouputnya saja seperti nama, npm, kelas, lalu go to Tanya untuk melanjutkan lagi atau selesai.

Lalu kita masuk pada men2, kita buat seperti men1 untukprogram inputnya saja seperti masukkan uts anda danmasukkan uas anda lalu kita confirm atau accept variablenya, dan kita masukkan compute yaitu proses untuk mencari nilai akhirnya yaitu kita kalikan dahulunilai uts * 0.7 + nilai uas * 0.3, lalu kita buat output laginilai akhir anda untuk output dari hasil nilai akhir, lalukita masukkan grade pada nilai akhirnya seperti kondisi if jika nilai lebih besar dari 90 dan 100 akan dapat grade A dan lulus, dan seterusnya sampai else if nilai < 50 makadia tidak akan lulus, lalu go to Tanya untuk melanjutkanlagi atau selesai.

Dan masuk pada men3, kita akan buat program perulanganyaitu kita masuk pada statment awal, kita buat dahuluprogram outputnya dan kita masukkan accept N, danperform cetak varying untuk mencetak nilai varyingnyalalu I dari 1 by 1 until > N, after sesudah itu variable J dari1 by 1 until J > I, kita Tanya lagi selesai atau lanjut, dankita beri space nya untuk cetak, dan kita masuk padastatement cetak kita buat kondisi if J = I lalu kita berispace, dan kita masuk pada statement Tanya, kita buatuntuk program Tanya “