Archive for Mei 2013
Listing Program Mesin Pencuci Piring Otomatis
By : sigit xp
Masih dengan topik
yang sama, yaitu mesin pencuci piring, saya akan mencoba membuat sebuah program dari flowchart mesin tersebut. Dengan menggunakan Turbo Pascal menggunakan Function pada listing program ini.
Listing
programnya adalah sebagai berikut:
Penjelasan
programnya adalah sebagai berikut:
Bagian
ini merupakan subprogram utama. Pada bagian ini dideklarasikan judul function
dan variabel yang akan digunakan dalam rumus function. Judul function
yang digunakan adalah “Counter” dan variabel yang digunakan dalam
rumus function-nya adalah “X”. variabel X menndakan perhitungan
pada mesin pencuci piring otomatis dimana ada penambahan satu (1) setaip
kali pencucian dilakukan sampai batas yang telah di tentukan.
Bagian ini
merupakan pendeklarasian variabel pada program utama. Nilai dari variabel ini
akan dimasukkan ke dalam rumus function yang telah dibuat sebelumnya
pada subprogram utama.
Sehingga perhitungan
pada rumus function akan dijalankan sesuai dengan pembatasan kerja
pada mesin cuci piring otomatis dan alat akan berhenti beroprasi jika telah
melewati batas pencucian yang telah ditentukan.
Bagian ini merupakan
program utama. Perintah CLRSCR sangat jarang digunakan pada satu program dalam
satu file.karena perintah ini biasa dipakai pada program yang
membutuhkan beberapa output , cara kerjanya dengan cara membersihkan tampilan
setelah output pertama selesai dibuat, sehingga output berikutnya dapat dibuat.
Begitu seterusnya sampai batas yang telah di berikan pada mesin tersebut.
Sedangkan perintah WRITELN digunakan untuk mencetak karakter yang sedang
dihitung yaitu proses pencucian piring .serta READLN digunakan untuk menulis
jumlah pencucian piring yang akan di cuci pada mesin tersebut.
Secara sederhana,
program di atas dapat dituliskan dalam bentuk flowchart sebagai
berikut: