Cara Menandai Lokasi Usaha di Google Map

Cara Menandai Lokasi Usaha di Google Map

Cara Menandai Lokasi Usaha di Google Map - Sudah banyak blogger yang menulis tentang cara menandai lokasi usaha/rumah/tempat bisnis di Google Map, namun blog Belajar Ilmu Komputer berusaha mempermudah semua pengunjung setia blog BIK agar tidak kesulitan mencari lagi ke mana-mana dan sudah tersedia di blog ini.

Agar tidak panjang lebar lagi, mari kita ikuti langkah demi langkah menandai lokasi usaha/rumah/tempat bisnis anda yang sudah dilengkapi dengan gambar.

1. Kunjungi Google My Business, silahkan kunjungi link berikut https://www.google.com/intl/id-ID/business/?hl=in-ID&ppsrc=GPDA2

2. Bila anda sudah memiliki akun google, silahkan klik Sign In, dan apabila anda belum memiliki akun Google, silahkan klik Get on Google dan klik Create Account (pada contoh kali ini saya anggap anda sudah memiliki akun Google)

3. Setelah login anda dihadapkan pada 3 pilihan tipe bisnis anda yaitu Storefront, Service Area dan Brand, silahkan pilih salah satu (saya memilih Service Area)

4. Silahkan ketikkan Business name dengan nama tempat usaha anda, dan lengkapi semua data lokasi usaha anda seperti, Country/Region, Street Address, City dll (lihat gambar) dan klik Continue

5. Ketika muncul pesan "We can't find this address. If the address you entered is correct, set the map's marker location to point to your business address" silahkan klik Set Marker Location.

6. Atur penanda pada alamat usaha anda yang tepat dengan cara klik Satellite agar posisi bangunan bisa terlihat jelas

7. Bila sudah pasti letak usaha anda, silahkan klik Done dan lanjutkan klik Continue

8. Apabila usaha anda melayani pengiriman area/kota tertentu saja, silahkan masukkan area/kota dengan cara ketikkan nama kota kemudian klik Add, hasilnya dapat dilihat seperti pada gambar dan klik Continue

 

  

 

9.Bila tempat anda sudah terdaftar sebelumnya maka silahkan pilih tempat usaha anda yang sudah tercatat di Google Map, jika belum, maka silahkan klik pada None of these match keep the information i entered

 

10. Tunggu hingga proses penandaan lokasi usaha anda selesai

 

 

11. Google mengharapkan anda memverifikasi lokasi usaha anda dengan cara mengirimkan kode verifikasi ke alamat usaha anda, bila anda setuju dengan verifikasi, silahkan klik Mail me my code (tunggu hingga kode yang dikirim datang ke alamat anda dan silahkan lakukan verifikasi)

 

12. Bila anda ingin melakukan verifikasi dikemudian hari maka silahkan klik Continue and verify later

13. Lanjutkan dengan klik Get Started dan lengkapi semua data usaha anda seperti alamat website dll. kemudian diakhiri dengan klik Done Editing

14. Klik Verify dan lanjut klik None of these match

15. Pada Optional contact name, silahkan ketik nama penerima kode yang akan dikirimkan oleh Google, bisa juga di kosongkan. Klik Send Postcard (perkiraan 1-2 minggu pengiriman kode tiba di alamat anda)

16. Klik Continue dan tunggu sampai menerima kartu pos berisikan kode verifikasi

17. Ketika sudah mendapatkan kode dari Google, silahkan login kembali ke Google My Business

18. Klik Verify Now

19. Ketik kode yang sudah anda terima dari Google dan klik Submit

20. Selesai

Itulah cara menandai lokasi usaha/rumah/tempat bisnis anda di Google Map agar mudah ditemukan oleh pelanggan maupun calon pelanggan anda. Cara menandai lokasi di Google Map ini cukup lengkap karena mulai dari awal hingga verifikasi alamat dengan memasukan kode yang dikirim oleh Google.

Semoga artikel sederhana dari blog Belajar Ilmu Komputer ini dapat bermanfaat bagi pengunjung dan pembaca blog BIK.

Fix Error Message WINDOWS/SYSTEM32/CONFIG/SYSTEM on Windows startup

Fix Error Message WINDOWS/SYSTEM32/CONFIG/SYSTEM on Windows startup

 

Langsung saja, apakah kawan-kawan pernah menemui masalah seperti di atas?? Saat komputer dinyalakan, tiba-tiba muncul pesan WINDOWS/SYSTEM32/CONFIG/SYSTEM file is missing? Eits, tunggu dulu, jangan terburu-buru di install ulang komputernya, sebab dengan tips singkat di bawah ini, semoga bisa membantu teman-teman, karena jika kita akan menginstall ulang komputer kita, mungkin perlu waktu lama, belum lagi driver dan program-program nya, belum lagi jika kita tidak menginstall sendiri, perlu bantuan orang lain atau teknisi komputer akan memerlukan biaya, dll...

Berikut tips untuk mengatasi Error Message WINDOWS/SYSTEM32/CONFIG/SYSTEM on Windows startup

Step 1:

***************************

Boot with the windows XP CD 

At "Welcome to setup screen" Press R

Select the appropriate path for windows and press enter

If it asks you for the administrator password, type the administrator password and 

press enter or just hit enter

We will now see the Prompt c:\windows>

Step 2:

***************************

cd system32\config 

ren system system.old 

ren software software.old 

ren SAM SAM.old 

ren security security.old 

ren default default.old 

Then type cd Type cd system~1\_resto~1 and press Enter

If you get "access denied" (Error) then 

Restart the computer by type Exit and get back to recovery console

type cd \ and it will display C:\>

type cd system~1\_resto~1 and press Enter

Step 3:

***************************

Type dir

It will list you restore points

(e.g. RP1, RP2, RP3, RP4, etc...)

Select the one from the list except the last one

Say RP4

· type cd RP3 (or RP2 or RP1 or RPn) and enter

· type cd snapshot and enter

· type copy _registry_user_.default c:\windows\system32\config\default and enter

· type copy _registry_machine_security c:\windows\system32\config\security and 

enter

· type copy _registry_machine_software c:\windows\system32\config\software and 

enter

· type copy _registry_machine_system c:\windows\system32\config\system and enter

· type copy _registry_machine_sam c:\windows\system32\config\sam and enter

· type exit and enter

sumber : http://www.techspot.com/community/topics/error-message-windows-system32-config-system-on-windows-startup.53755/

Pengetahuan Komputer

1. Pembuat komputer pertama di dunia

Sir Harold Thomas Flower. Dia adalah pembuat komputer elektronik pertama di dunia pada tahun 1941 yang bernama Colossus dan digunakan oleh Unit Pemecah Sandi Militer Rahasia Inggris untuk memecahkan kode transmisi radio NAZI.

 

Sir Harlot Thomas Flower memberi nama komputer pertama adalah ENIAC (Electronic Numerator Intregrator Analyzer and Komputer) adalah komputer komersil pertama di dunia. Komputer ini beratnya 60,000 pon dan besarnya satu ruangan besar. ENIAC selesai dibuat tahun 1945. ENIAC awalnya dibuat untuk keperluan militer. Komputer ini tidak bisa menyimpan data.

2.  Orang terkaya di dunia karena software komputer

William Henry Gates atau lebih sering disebut dengan Bill Gates adalah orang terkaya di dunia selama 12 tahun terakhir ini (menurut majalah Forbel). Gates adalah pendiri dan ketua perusahaan Microsoft yang bergerak di bidang software. Dia juga pendiri perusahaan Corbis yang bergerak di bidang arsip citra digital.

3. Asal Mula Istilah Bug Pada Komputer

Istilah Bug berasal dari Bahasa Inggris yang artinya Serangga.Bug ditemukan di Komputer oleh Grace Murray Hopper dan Timnya, saat itu mereka sedang bekerja pada komputer kalkulator Relay Aiken Mark II University Hardvard. Lalu Komputernya bermasalah. Setelah di cari ternyata ada serangga pada Relay #70 yang kemudian menamakannya dengan istilah BUG. Kemudian hingga saat ini Bug menjadi Istilah Kerusakan Software Komputer.

4. Modem pertama

Sekitar tahun 1950an, bagian pertahanan udara Amerika meminta dibuatkan alat untuk mengirim data lewat telepon. Modem komersial pertama dibuat AT&T dan diluncurkan Bell 103 pada tahum 1962 dengan kecepatan 300 bit/detik. Pada tahun 1996 sudah ada modem dengan kecepatan 56.000 bit/detik.

5. Virus pertama yang menyebabkan kerugian tertinggi

Pada tahun 2004 SCO Group Inc. di Colorado terserang DDOS dari virus MyDoom worm. Kerugiannya hingga $38.5 milyar USD atau sekitar Rp.346.5 triliyun. SCO Group menghadiahkan $250,000 atau sekitar Rp 2.25 triliyun untuk menangkap pembuat virus MyDoom.B. Virus lain yang telah diketahui menyebabkan kerugian besar adalah : virus SoBig yang menyebabkan kerugian $37.1 miliar atau Rp 333.9 triliyun, virus Love Bug menyebabkab kerugian $15 miliar atau sekitar Rp 135 triliyun, dan virus Code Red yang menyebabkan kerugian hingga $2 miliar atau sekitar Rp 18 triliyun.

6. Web browser pertama

 

NCSA Mosaic dibuat oleh Marc Andreesen dari National Centre for Supercomputing Applications pada bulan April 1993 untuk keperluan khusus. Tapi WorldWideWeb yang dibuat Tim Berners-Lee pada bulan Desember 2000 dianggap sebagai web browser pertama karena penggunaannya yang luas. Namanya kemudian diganti jadi Nexus. Pada bulan Oktober 1994, Netscape mengeluarkan versi beta dari Mozilla dan menjadi web browser komersil pertama.

7. Website pertama

Sir Timithy John "Tim" Berners-Lee adalah orang pertama yang menciptakan world wide web pada agustus 1991. Situsnya adalah http://nxoc01.cern.ch.

8. Website komersil pertama

Pada bulan Oktober 1994 HotWired mulai berfikir untuk menerima pemasangan iklan di internet karena internet sekarang sudah digunakan oleh masyarakat luas. AT&T memasang banner 468 x 60 yang dipasang di situs HotWired site. Ini adalah keuntungan pertama dari internet. Pada tahun 1993 Dale Dougherty meluncurkan Global Network Navigator, yang dibeli AOL tahun 1995, inilah yang dianggap sebagai web site komersil pertama.

9. Webcam pertamakali digunakan

Tahun 1991, Paul Jardetzky, Qunetin Stafford-Fraser dan mahasiswa Cambrige University membuat program untuk menampilkan gambar secara on-line. Pada tahun 1993, web baru tersedia secara luas untuk semua pengguna internet.

10. Search engine pertama

Search engine pertama didesain untuk internet dibuat pada tahun 1993 dengan nama World Wide Web Warderer (Wadex). WebCrawler, 1994, adalah search engine pertama yang berdasarkan teks seperti search engine yang sekarang.

Demikian sebuah artikel yang mungkin bermanfa'at dan menambah wawasan anda semua para viewer dan terima kasih atas partisipasinya telah membaca artikel sederhana ini. Untuk mengetahui lebih lanjut sertakan Komentar untuk menanyakan lebih lajut artikel ini.

TUGAS SOFTSKILL KE 4

Internet Of Thing atau disingkat IOT adalah konsep yang bertujuan untuk memperluas manfaat dari konektivitas internet yang tersambung terus-menerus.
Kemampuan IOT seperti berbagi data, remote control, dan sebagainya, termasuk juga pada benda di dunia nyata. Contohnya bahan pangan, elektronik, koleksi, peralatan apa saja, termasuk benda hidup yang semuanya tersambung ke jaringan lokal dan global melalui sensor yang tertanam dan selalu aktif.

CARA KERJA
Cara Kerja Internet of Things yaitu dengan memanfaatkan kecerdasan buatan dan control otomatisasi yang dimana tiap-tiap perintah menghasilkan sebuah interaksi antara sesama mesin yang terhubung secara otomatis tanpa campur tangan manusia dan dalam jarak berapa pun.Internetlah yang menjadi penghubung di antara kedua interaksi mesin tersebut, sementara manusia hanya bertugas sebagai pengatur dan pengawas bekerjanya alat tersebut secara langsung.
IoT memiliki potensi untuk menyentuh setiap aspek kehidupan manusia. Angka-angka ini menunjukkan skala dampak yang besar yang diharapkan oleh IoT:

• Akan ada 50 miliar perangkat terhubung ke Internet di seluruh dunia pada tahun 2020

• Akan ada 3.5 perangkat yang terhubung per orang pada tahun 2015 dan hampir 7 pada tahun 2020

• 8 miliar jalur akses mobile broadband pada 2019

• 4,5 juta pekerjaan IoT pada tahun 2020

• Nilai 14,4 triliun selama dekade berikutnya

• Pendapatan tambahan 97 miliar di industri perangkat medis pada tahun 2024

• Pertumbuhan 70 persen per tahun sampai 2018 dalam total penjualan pakaian dan aksesoris yang menggabungkan teknologi komputer

• Pasar 3,3 triliun untuk aplikasi dan layanan 'Smart City' pada tahun 2025


teknologi baru sedang berkembang menuju hal-hal berikut:

• Manusia hybrid: augmented reality, bio-acoustic sensing, wearable, gesture control, 3D bio-printing ...

• Mesin menggantikan manusia: Mobil tanpa pengemudi, robot, asisten virtual ...

• Manusia dan mesin bekerja sama: NLP, HCI, asisten virtual ...

• Mesin lebih memahami manusia dan lingkungan: Geo-lokasi, biometrik, pemindai 3D, pemantauan kesehatan seluler ...

• Manusia lebih memahami mesin: IoT, M2M, jaringan Mesh ...

• Manusia dan mesin menjadi lebih cerdas: Analisis Neurobusiness, prediktif dan preskriptif, pemrosesan acara yang kompleks ...

DAMPAKNYA
Akan ada aturan baru di masa depan tentang ‘ apa yang bisa dihubungkan, akan terhubung ‘, seperti contohnya mobil otomatis yang bisa dikendalikan otomatis yang terhubung dengan jadwal anda, dan mencari rute terbaik berdasarkan tingkat kemacetan yang ada. Dan nyatanya itu sudah ada. 
Ada juga smart home yang tau kapan harus menyalakan lampu menggunakan ambient sensor dan dapat mengirim pesan ke anda bagaimana situasi rumah anda saat ini secara real time.
Pada skala yang lebih luas, IoT dapat diterapkan pada hal-hal seperti jaringan transportasi: smart city yang dapat membantu mengurangi limbah dan meningkatkan efisiensi untuk hal-hal seperti penggunaan energi; ini membantu kita memahami dan memperbaiki cara kita bekerja dan hidup. Lihatlah visual di bawah ini untuk melihat seperti apa rupa itu.

Kenyataannya adalah bahwa IoT memungkinkan kesempatan dan koneksi yang hampir tak berujung terjadi, banyak yang bahkan tidak dapat kita pikirkan atau pahami dampaknya sekarang. Tidak sulit untuk melihat bagaimana dan mengapa IoT adalah topik hangat saat ini.

sumber 

https://dailysocial.id/post/perkembangan-industri-internet-of-things-di-indonesia-tahun-2017

http://www.mobnasesemka.com/internet-of-things/

CONTOH PROGRAM PERULANGAN GO TO

CONTOH PROGRAM PERULANGAN GO TO

Diposting oleh Rizky Rachmad F

LISTING PROGRAM :

logika kodingannya di bawah ini :

1.  Statement IDENTIFICATION DIVISION : pada program cobol diatas statement ini merupakan sebuah divisi yang pertama yang paling sederhana pada COBOL, dan berfungsi untuk memberikan keterangan atas program yang akan kita buat selanjutnya,

2. Statement PROGRAM-ID. PERFORM1. : Yaitu Merupakan judul data pada program yang akan kita buat pada program,

3. Statement ENVIRONTMENT DIVISION. :Yaitu digunakan untuk memberikan sebuah dokumentasi informasi mengenai peralatan yang akan kita gunakan.

4. Statement DATA DIVISION. : Yaitu digunakan untuk memberikan semua keterangan untuk record dan memberikan bentuk format yang akan kita gunakan pada procedure division.

5. Statement WORKING-STORAGE SECTION. : Yaitu berfungsi untuk mendeklarasikan variable dan tipe data yang ingin kita gunakan.

6. Statement 77 JABATAN PIC 9. :Yaitu menunjukkan sebuah judul awal, yang merupakan level number 77 yang berfungsi jika pemograman membutuhkan catatan lalu jabatan sebagai nama pada prosedur yang digunakan pada kolom 9.

7. Statement PROCEDURE DIVISION. : Yaitu merupakan inti dari COBOL, yang berisikan semua instruksi-instruksi  yang kita tulis

8. Statement TANYA JABATAN. : Yaitu berfungsi untuk memulai suatu divisi yang akan kita tampilkan pada output,

9. Statement DISPLAY ‘JABATAN ANDA  [1, 2, DAN 3]?’. : Yaitu berfungsi sebagai menu option atau pilihan untuk memilih prosedur yang telah disediakan,

10. Statement  ACCEPT JAWABAN.  :Yaitu berfungsi untuk menampilkan atau menyetujui sebuah prosedur yang kita pilih,

11. DISPLAY SPACE. :Yaitu berfungsi untuk memberikan jarak pada sebuah running program yang akan kita cetak,

Statement ACCEPT JABATAN. :Yaitu menyetujui kodingan DISPLAY ‘JABATAN ANDA [1, 2, DAN 3]?’.

12. Jika pada menu pilihan diatas yang kita pilih tidak sesuai  dengan data yang disediakan maka kita isi kembali prosedurnya dengan GO TO TUNJ1, TUNJ2, TUNJ3 DEPENDING ON JABATAN. Selain prosedur tunj1, tunj2 dan tunj3 maka akan pergi dan mencetak DISPLAY ‘TIDAK ADA JABATAN TERSEBUT, ULANG ! ’.  akan menampilkan prosedur tidak ada jabatan,ulang ! jika yg kita pilih tidak ada pada menu plihan diatas,

13. Statement  GO TO TANYA-JABATAN. : Yaitu berfungsi untuk akan menanyakan kembali pada menu pilihan jabatan yang kita pilih.

14. Pada TUNJ1. :Yaitu  digunakan untuk mencetak sebuah isi prosedurnya dengan DISPLAY “TUNJANGAN ANDA SEBESAR RP.100.000,- ”. Untuk mencetak kata tunjangan anda sebesar RP.100.000,

15. Pada GO TO SELESAI. :YAitu berfungsi untuk kembali menghentikan program sehingga sudah tidak running kembali,

16. Pada TUNJ2. :Yaitu  digunakan untuk mencetak sebuah isi prosedurnya dengan DISPLAY “TUNJANGAN ANDA SEBESAR RP.200.000,- ”. Untuk mencetak kata tunjangan anda sebesar RP.200.000,

17. Pada GO TO SELESAI. :YAitu berfungsi untuk kembali menghentikan program sehingga sudah tidak running kembali,

18. Pada TUNJ3. :Yaitu  digunakan untuk mencetak sebuah isi prosedurnya dengan DISPLAY “TUNJANGAN ANDA SEBESAR RP.300.000,- ”. Untuk mencetak kata tunjangan anda sebesar RP.300.000,

19. Pada GO TO SELESAI. :YAitu berfungsi untuk kembali menghentikan program sehingga sudah tidak running kembali

20. Pada Statement SELESAI. : Yaitu berfungsi untuk menghentikan  program,

21. STOP RUN. : Yaitu untuk benar-benar menghentikan semua prosedur program yang kita gunakan.

Contoh Program COBOL (Menghitung Nilai UAS dan UTS)

Contoh Program COBOL (Menghitung Nilai UAS dan UTS)

Diposting oleh Rizky Rachmad F     

Saya akan menjelaskan program sederhana pada COBOL, yaitu menghitung nilai UAS dan UTS pada cobol. Dan langsung saja saya akan menjelaskannya di bawah ini :

MENGHITUNG NILAI UAS DAN UTS

Inilah codingan nya :

Dan selanjutnya saya akan menjelaskan logika kodingannya di bawah ini :

IDENTIFICATION DIVISION. : Yaitu sebuah divisi yang pertama, berfungsi untuk memberikan keterangan pada program yang akan kita buat,

PROGRAM-ID. FUNGSI. : yaitu sebuah judul data pada program yang akan dibuat.

AUTHOR. MSR. :  yaitu menunjukkan bahwa penulis data diatas adalah MSR.

ENVIRONTMENT DIVISION. : Yaitu divisi yang kedua, berfungsi untuk memberikan sebuah dokumentasi informasi mengenai peralatan yang akan kita digunakan.

DATA DIVISION. : Yaitu berfungsi untuk memberikan semua keterangan record dan juga memberikan bentuk format yang digunakan pada procedure division.

WORKING-STORAGE DIVISION. : Yaitu merupakan section pada data division,

01 UTS PIC 9(3). : Yaitu menunjukkan sebuah judul awal yang akan kita buat,dan 9 merupakan output program yang menampilkan pada baris ke-9. 
01 UAS PIC 9(3). : Yaitu merupakan sebuah level number 1 yang digunakan, jika pemrograman membutuhkan catatan dan angka 9 tersebut merupakan output program yang akan menampilkan pada baris ke-9.

01 HASIL PIC 9(3). : Yaitu output program dari nilai UAS dan UTS, angka 9 tersebut merupakan output program yang akan menampilkan pada baris ke-9.

SCREEN SECTION. : Yaitu merupakan section pada sebuah data division,

01 HAPUS. Dan 02 BLANK SCREEN. : Yaitu level number yang berfungsi untuk  membersihkan layar pada COBOL,

PROCEDURE DIVISION. : Yaitu yang berisi semua instruksi-instruksi yang kita tulis tadi,

MULAI. : Yaitu berfungsi untuk memulai suatu divisi atau memproses data yang akan kita tampilkan,

DISPLAY HAPUS. : Yaitu Untuk membersihkan pada layar,
DISPLAY ( , ) ‘MASUKKAN NILAI UTS  : ‘. : Yaitu  berfungsi untuk data yang akan kita tampilkan pada output program nya dan memasukkan data angka nilai UTS,

ACCEPT  UTS. : Untuk menyetujui display data sebelumnya, yaitu data pada MASSUKAN NILAI UTS,
DISPLAY ( , ) ‘MASUKKAN NILAI UAS : ‘. : Yaitu  berfungsi untuk data yang akan kita tampilkan pada output program nya dan memasukkan data angka nilai UAS,

ACCEPT UAS. : Untuk menyetujui display data sebelumnya, yaitu data pada MASSUKAN NILAI UAS,

HITUNG. Dan COMPUTE HASIL = ( UTS * 70 / 100 ) + ( UAS * 30 / 100 ) : Yaitu yang akan menampilkan rumus fungsinya, dan rumus fungsi compute yang digunakan untuk menghitung hasil dari data nilai UTS dan UAS yang tadi kita masukkan.

Seleksi. Dan DISPLAY HASIL. : Yaitu untuk menampilkan hasil dari nilai UTS dan nilai UAS ketika program kita running.

IF HASIL > 70. : Yaitu Merupakan sebuah program data IF yang berfungsi untuk meng-input nilai dari UTS dan nilai UAS yang hasilnya lebih dari 70,

DISPLAY ( 8 , 6 ) ‘LULUS’. : Yaitu yang menampilkan data IF diatas (IF HASIL >70) pada running program cobol diakhir pada baris 8 kolom 6 dan akan menampilkan LULUS.

IF HASIL < 70. Yaitu Merupakan sebuah program data IF yang berfungsi untuk meng-input nilai dari UTS dan nilai UAS yang hasilnya kurang dari 70,DISPLAY ( 8 , 6 ) ‘TIDAK LULUS’. :  Yaitu yang menampilkan data IF diatas (IF HASIL <70 6="6" 8="8" akan="akan" baris="baris" cobol="cobol" dan="dan" diakhir="diakhir" kolom="kolom" lulus.="lulus." menampilkan="menampilkan" pada="pada" program="program" running="running" span="span" tidak="tidak">

SELESAI. : Yaitu mengakhiri program.

STOP RUN. : Yaitu mengakhiri seluruh program data dari data diatas yang telah kita buat.

Laporan program

LAPORAN AKHIR

R PROGRAM

         Nama          : Rizky Rachmad
NPM             : 16116613




Membuat Program menu pada cobol
Membuat menu pada cobol, yang mana menu tersebut berisi program biodata dan looping.

Pertama buka open cobol, kemudian masukan perintah berikut :

Logika :
·         IDENTIFICATION DIVISION : Dari nama divisi-nya kita dapat menyimpulkan kegunaan dari divisi ini yaitu sebagai identifikasi program COBOL yang kita buat misalnya nama pembuat (AUTHOR) dan nama program (PROGRAM-ID).
·         PROGRAM-ID : bagian dari divisi identifikasi, berguna untuk menamakan program, disini nama programnya adalah Program Menu.
·         AUTHOR : untuk memberi nama pembuat programmer.
·         DATA DIVISION : Divisi ini berguna untuk memberikan informasi peralatan yang digunakan dalam program, dibagi menjadi 2 section yaitu CONFIGURATION SECTION dan INPUT-OUTPUT SECTION. CONFIGURATION SECTION bersifat optional (boleh tidak ditulis) yang berisi tentang peralatan hardware yang digunakan program. INPUT-OUTPUT SECTION, section ini digunakan untuk operasi file (akan dijelaskan kemudian). Contoh : ENVIRONMENT DIVISION. CONFIGURATION SECTION. SOURCE-COMPUTER. IBM-PC. OBJECT-COMPUTER. IBM-PC.
·         WORKING STORAGE SECTION : berguna untuk tempat .mendeklarasikan variable-variable yang akan digunakan nanti.
·         LEVEL NUMBER 77 : Adalah level number yang berdiri sendiri.
PICTURE CLAUSE & EDITING :
·         PIC 9 : Adalah picture clause yang berfungsi sebagai bentuk variabel yang berupa numeric. jika dituls pic  999 atau pic 9(3), maka berarti variabel tersebut memiliki tipe numerik dengan 3 digit. Contoh variabel yang digunakan pada program : n, i, j, pil, uts, uas, hasil.
·         PIC A : Adalah picture clause yang berfungsi sebagai bentuk variabel yang berupa alfabet. Pic a(20) berarti bertipe alfabet dengan 20 digit. Contoh variabel yang digunakan pada program : nama, fkl, jrs.
·         PIC X : Adalah picture clause yang berfungsi sebagai bentuk variabel yang berupa alfanumerik. Pic x(20) berarti bertipe alfanumerik dengan 20 digit. Contoh variabel yang digunakan pada program : l, npm, kelas.
·         PIC 99/99/9999 : picture clause yang berfungsi untuk menyisipkan tanda slash. Biasa digunakan saat mengisi tanggal lahir. Contoh variabel yang digunakan pada program : tgl.
·         SCREEN SECTION : digunakan untuk menentukan format layar tampilan baik input atau output.
·         01 CLS & BLANK SCREEN : untuk menghapus layar.

PROCEDURE DIVISION :
·         MULAI : sebuah nama paragraph / nama procedure.
·         DISPLAY CLS : untuk memanggil cls yang akan menghapus layar.
·         Setelah itu program akan menampilkan keluaran yang berupa beberapa menu yaitu : perulangan 1, perulangan 2, biodata & exit.
·         Lalu akan disuruh untuk memasukan pilihan menu ke dalam variabel pil, pilhannya berupa angka 1 sampai 4, jika sudah program akan meloncat ke prosedur 1, 2, 3, 4 tergantung dari variabel pil, jika memasukkannya lebih dari 4 maka program akan mengeluarkan “menu (pil) tidak tersedia”, dan akan lompat ke prosedur mulai.
·         ACCEPT L : berfungsi sebagai jeda dan enter.
·         GO TO MULAI : untuk meloncat kembali ke prosedur mulai.

Ini adalah prosedur 1 yang berisi perulangan . di prosedur ini program akan melakukan looping yang di awali dari menerima input dari user ke variabel N, kemudian perform cetak untuk melakukan perintah yang ada di prosedur cetak.

Di dalam prosedur cetak terdapat beberapa perintah untuk menghasilkan keluaran yang berupa “*”, dan ada pengandaian jika j = I maka akan melakukan enter.
Untuk perulangan ini jika akan memasukan banyaknya perulangannya adalah 7 maka, variabel i akan melakukan looping dari nilai 1 kemudian ditambah 1 sampai nilai I lebih besar dari pada nilai n. setelah itu variabel j juga melakukan looping dari 1 kemudian ditambah 1 sampai nilai j lebih besar dari pada nilai I. jika looping j sudah terpenuhi lalu looping I belum, maka nilai j akan menjadi nilai awal.
Accept l berfungsi sebagai enter atau jeda, kemudian akan ditujukan kembali kepada prosedur mulai.


Ini adalah prosedur 2 yang berisi perulangan . di prosedur ini program akan melakukan looping yang di awali dari menerima input dari user ke variabel N, kemudian perform cetak untuk melakukan perintah yang ada di prosedur cetak.
Untuk perulangan ini jika akan memasukan banyaknya perulangannya adalah 7 maka, variabel i akan melakukan looping dari nilai variabel n kemudian dikurang -1 sampai nilai I lebih kecil dari pada 1. setelah itu variabel j juga melakukan looping dari 1 kemudian ditambah 1 sampai nilai j lebih besar dari pada nilai I. jika looping j sudah terpenuhi lalu looping I belum, maka nilai j akan menjadi nilai awal.
Accept l berfungsi sebagai enter atau jeda, kemudian akan ditujukan kembali kepada prosedur mulai.

Ini adalah prosedur biodata yang di dalamnya memakai variable nama, npm, kelas, fkl, tgl, jrs, tgl, uts, uas dan hasil. Di prosedur ini terdapat perhitungan untuk variabel hasil yaitu nilai uts dikalikan 0.7 lalu ditambah dengan nilai uas dikalikan 0.3. setelah menginput data ke variabel maka program akan memunculkan keluaran berupa inputan yang dimasukkan tadi.
Accept l berfungsi sebagai enter atau jeda, kemudian akan ditujukan kembali kepada prosedur mulai.

Kemudian ada prosedur 4 yang digunakan untuk keluar dari program.





Berikut adalah contoh hasil program :



Buat IDENTIFICATION DIVISION,  PROGRAM-ID.
 Lalu ENVIRONMENT DIVISION.
Dan DATA DIVISION.
Didalam Working-Storage Section . kita buat deklarasi Data A dan B sebagai Indenpent dengan tipe Numerik.
Gambar Berikut;

Masuk kedalam Coding Perulangan.
Perform CETAK
A dari 1 ke 1 sampai A lebih 5.
B  dari 1 ke 1 sampai B lebih dari A.
Stop Run.
Kemudian Panggil Peform CETAK.
Tampilkan A
Jika B = A tampilkan Spasi
Gambar Berikut ;

     A > 5  

B > A            B = A SPACE (Baris Baru)

A>5	B>A	Dicetak output A
1	1>1	1
	2>1	SPASI
2	1>2	2
	2>2	22
	3>2	SPASI
3	1>3	3
	2>3	33
	3>3	333
	4>3	SPASI
4	1>4	4
	2>4	44
	3>4	444
	4>4	4444
	5>4	SPASI
5	1>5	5
	2>5	55
	3>5	555
	4>5	5555
	5>5	55555
	6>5	SPASI
6>5	6>6	Karena Sampai 5 Jadi tidak ada