• Welcome!

    Selamat datang di XNCOM. Jelajahi hal hal menarik disini!.

  • Kami Berbeda!

    Kami senantiasa berbagi dengan cara yang sedikit berbeda dengan orang lain.

  • Turut membantu UCH Indo

    Kami juga turut membantu dan mengembangkan Chanel UCH Indo agar bisa berkembang sebagaimana mestinya. Klik untuk Melihat kami UCH Indo.

  • Dukung Kami!

    XNCOM, UCH Indo, dan Gema Agro Persada adalah beberapa Chanel yang kami kelola. Dukung kami dengan menekan tombol Subscribe di Chanel-Chanel kami.

Senin, 29 Februari 2016

Rabu, 10 Februari 2016

Tutorial Program BilingInPascal

10.59 – by 0
BilingInPascal adalah program yang berfungsi untuk menghitung biaya biling yang telah dimainkan oleh pemain warnet. Program ini berbahasa Pascal. Untuk membuat Program tersebut cukup memasukan kode kode dibawah ini. 
Step 1
Step 2 

  Penjelasan Step1.
Variabel pada Program ini terdapat 4. Yaitu NAMA, MENIT, JADI, dan BILING. 
Variabel NAMA berfungsi sebagai menyimpan dan memunculkan nama pada pemakai biling. Type Variabel NAMA yaitu String karena memuat Huruf saja. 
Variabel MENIT berfungsi sebagai penampil dan menyimpan angka menit yang dimasukan oleh user. Type Variabel MENIT yaitu longint karena memuat angka yang besar. 
Variabel JADI berfungsi sebagai menghitung satuan setiap 20 Menit. Type Variabel JADI adalah Real karna memuat bilangan desimal. 
Variabel terakhir adalah BILING. Fungsi Variabel BILING adalah Menghitung Variabel JADI menjadi sebuah Harga yang ditentukan oleh Program ini. Type Variabel BILING adalah Real karena memuat angka Desimal. 
 Write pertama Membuat dan ucapan Selamat datang Program. Lalu Menekan Enter untuk Lanjutkan. Setelah itu muncul peringatan bahwa Setiap 20 Menit harganya Rp. 1000 dan untuk lebih dari 60 Menit maka dihitung setiap menit = Rp. 50. Write Selanjutnya adalah memasukan nama. Disini Variabel NAMA akan menyimpan Nama yang diinput. Write Selanjutnya adalah memasukan berapa menit ia bermain. Disini Variabel MENIT berfungsi untuk menyimpan angka Menit yang dimasukan. Selanjutnya ada Operasi pembagian yaitu BILING:=MENIT/20;. Operasi ini bermaksud untuk menghitung satuan yang dihitung yang artinya Jika 20 Menit = 1 maka 1 * 1000 = Rp.1000. Jika 40 Menit maka 40/20=2*1000=Rp.2000 dan seterusnya. Jadi Operasi ini berfungsi sebagai penghitung satuan agar penghitungan harga lebih mudah. Selanjutnya ada Operasi Perkalian yaitu JADI:=BILING*1000;. Operasi ini berfungsi untuk menentukan harga biling. Jadi Hasil operasi Variabel BILING tadi dikalikan dengan Harga 1000 untuk hasil 1. Jadi Operasi ini berfungsi untuk menentukan Harga yang telah ditetapkan. Selanjutnya adalah masuk ke operasi pemilihan (IF. Pemilihan pertama yaitu if BILING >=3 then maksudnya adalah jika BILING lebih dari 3 maka Write Nama pengguna Bermain selama Sekian menit dan membayar Sekian Ribu. Nilai sekian Ribu didapat dari Variabel JADI. ‘,JADI:10:1,’ bermaksud untuk mengatur angka dibelakang koma. Penjelasan Step 2 Else bermaksud jika tidak. Artinya jika Variabel pertama bervalue False atau tidak sesuai dengan if BILING >=3 Pengecualiannya adalah dengan if BILING <=1 maka format penulisannya sama seperti tadi. Tetapi setiap 20 Menit maka Hasilnya akan ditambah Rp.1000. End bermaksud untuk mengakhiri Script dari program tersebut.

Untuk Mendownload Hasil Akhir, dapat di download di https://drive.google.com/file/d/0B4S_7-aZEjsNRUFSU2ljVklPU2s/view?usp=sharing.

Selamat Mencoba.
Langganan: Postingan (Atom)