Kalkulator Sederhana di Pascal

          Di postingan sebelumnya kita telah membahas sedikit tentang Pascal. Nah sekarang kita akan mencoba membuat sebuah program sederhana dengan Pascal. Untuk teman-teman yang mempunyai softwarenya bisa coba yuk! Kalau yang belum ada bisa download softwarenya segera.

Yang akan kita coba buat sekarang adalah tentang kalkulator sederhana. Kita akan membuat sebuah program yang dapat melakukan operasi tambah, kuran, kali dan bagi disini. Yuk langsung aja tulis source code di bawah ini ke pascalnya... Tapi yang ini saya membuatnya di NotePad++ ... jadi kita bisa membuat source code-nya itu tidak hanya di aplikasi pascalnya langsung.. kita bisa membuatnya di NotePad, NotePad++ dll.. Setelah kita membuat source code-nya kita bisa mengkopinya, kemudian di pascal kita bisa memilih menu Edit -> Paste From Windows

ini source code-nya

Disini kita hanya memakai 2 variabel, yaitu variable a dan variable b. Tipe Data yang saya gunakan adalah “real”. Kedua variable ini harus dideklarasikan terlebih dahulu (lihat baris 4). Lalu masuk ke main program, disitu tertulis “clrscr;” gunanya adalah untuk membersihkan layar. coba deh syntax itu di hapus, lalu jalankan program, pasti akan berbeda. Setelah itu di baris 8 saya menuliskan syntax “writeln” ini berarti program akan mengeluarkan output, outputnya adalah tulisan yang ada setelah syntax tersebut, di baris 8 itu akan menghasilkan output “ --------------------------------”. yang baris ke 9 dan 10 juga sama, akan menghasilkan output saja. Kemudian baris 11 disana tertuliskan “write  ('  Masukkan nilai 1 : '); readln(a);” artinya program akan mencetak “masukkan  nilai 1 : “ kemudian bila user menginputkan angka maka angka tersebut akan dibagai sebagai “a”. Baris selanjutnya mirip dengan baris 11, hanya saja input yang dimasukkan user akan dibaca sebagai “b” disini. NB : setiap ada syntax write atau writeln artinya program akan mengeluarkan sebuah output.

Berikutnya langsung ke baris 15 yuk.. sebentar, untuk baris 14 kita tidak mencetak apapun karena di baris tersebut tidak ada syntax-nya. baris 15 sampai 18 tersebut digunakan untuk mencetak output hasil perhitungan dari bilangan yang telah diinputkan oleh user. Saya kira yang ini sudah jelas, prinsipnya seperti pas kita melakukan input nilai.

      Nah untuk program ini karena saya menggunakan inputan dengan tipe data “real” maka hasil perhitungannya juga akan menghasilkan type data “real”. Untuk program diatas saya tidak menggunakan variabel untuk hasil perhitungan. Jadi tidak perlu dideklarasikan variabel hasil perhitungannya. Kemudian di bagian output pembagian saya tulis :

“Writeln (‘ Hasil pembagiannya adalah ‘,a/b:2:2);”

Yang saya blok kuning tersebut menunjukkan tempat(kolom) dan angka di belakang koma (karena real adalah tipe data untuk bilangan desimal, bedakan dengan integer yang digunakan untuk bilangan bulat saja). Angka yang pertama (2) menunjukkan hasilnya di kolom ke-2 setelah karakter yang terakhir ditulis. Sedangkan angka yang di belakang (2) menunjukkan bahwa di belakang koma dia ada 2 angka saja, misalnya hasil pembagiannya 3,33333... yang akan ditulis hanya 3,33 (2 angka).

      Kedua angka ini dapat diganti sesuai apa yang dibutuhkan maupun apa yang diinginkan oleh pemakai. Nah hasilnya adalah seperti ini.... ini saya menginput 22.5 untuk a dan 2.5 untuk b-nya..

output-nya

      Semoga bermanfaat ^^