Program Kalkulator Sederhana Pengitungan dengan 4 operator (+,-,x,/) diantara 2 Angka

Posted by : BayuBayyz Selasa, 11 Maret 2014

- Program Kalkulator Sederhana -

Untuk membuat program ini kita harus memahami konsep dasar struktur pemilihan dalam algoritma dan pemrograman serta mampu menganalisis persoalan yang ada !
Oiya saya lupa untuk menyapa sobat yang berkunjung . Hallo guys, selamat pagi, siang, sore, malam, atau dini hari yaa

. Assalammualaikum Warahmatullahi Wabarakatu !
Kapanpun dan dimanapun anda membaca artikel ini, saya ucapkan salam, selamat belajar dan semoga anda dapat mendapatkan apa yang anda cari disini.

Kita dapat membuat program kalkulator sederhana dengan operator yang umun digunakan yaitu operator penjumlahan, pengurangan, perkalian dan pembagian pada 2 angka yang ingin dihitung pada program kalkulator.

Persoalannya sebagai berikut !

Buatlah algoritma dan program dalam pemrograman bahasa pascal kalkulator sederhana dengan menggunakan operator penjumlahan, pengurangan, perkalian dan pembagian pada 2 angka dan tampilkan kelayar hasilnya. - Kedua angka dan operator penghitungan dimasukkan oleh user !

Dari persoalan diatas kita dapatkan logika untuk menyelesaikannya sebagai berikut :

1. Input 2 angka yang di tampung oleh variabel (bebas variabel apa saja). Saya gunakan variabel x dan y, kita anggap variabel x untuk angka ke-1 dan y untuk angka ke-2. Dan type data untuk variabelnya adalah integer, karena angka angka yang dimasukkan dalam bentuk bilangan bulat.

2 Input salah satu operator yang ditampung oleh variabel. Kalo saya gunakan variabel op. Karena operator yang digunakan adalah +,-,x,/ maka type data untuk variabel op adalah char agar sesuai dengan kebutuhan.

3. Menggunakan struktur pemilihan untuk proses mencacah penghitungan dan menentukan hasil dari penghitungan.

4. Tampung angka yang dihasilkan pada sebuah variabel, kalo saya menggunakan variabel hasil. Karena bilangan yang dihasilkan dari operator pembagian akan ada kemungkinan tidak akan menghasilkan bilangan bulat, jadi type data untuk variabel hasil adalah real.

Nah setelah kita dapatkan logikanya seperti itu, kita buat algoritmanya. Berikut adalah algoritma Program Kalkulator Sederhana Pengitungan dengan 4 oerator (+,-,x,/) diantara 2 Angka :

program penghitungan_dua_angka_kalkulator_sederhana_____byBayuWPP
{I.S. : User memasukkan dua buah angka dan operator penghitungannya (+,-,*,/)}
{F.S. : Menampilkan hasil penghitungan}
// pascal coding by @BayuWPP bayubayyz.blogspot.com
Kamus :
   x,y       : integer

   hasil     : real
   op        : char
begin
   Input(x)
   Input(op)
   Input(y)
   if op = '+' {jika op adalah +}
   then
       hasil ← x+y
   else
       if op = '-' {jika op adalah -}
       then//by BayuWPP
           hasil ← x-y
       else
           if op = 'x'
           then
               hasil ← x*y
           else
               hasil ← x/y
           endif
       endif
   endif
   {menampilkan penginputan oleh user}
   Output(x,op,y)
   {menampilkan hasil penghitungan}
   Output(hasil)

Selesai algoritma selanjutnya kita buat programnya. Berikut pascal coding untuk membuat program Kalkulator Sederhana Pengitungan dengan 4 oerator (+,-,x,/) diantara 2 Angka :

program penghitungan_dua_angka_kalkulator_sederhana___byBayuWPP;
{I.S. : User memasukkan dua buah angka dan operator penghitungannya (+,-,*,/)}
{F.S. : Menampilkan hasil penghitungan}
// pascal coding by @BayuWPP bayubayyz.blogspot.com
var
   x,y       : integer;
   hasil     : real;
   op        : char;
begin
   writeln('Pengitungan tambah/kurang/kali/bagi 2 Angka (x dan y)');
   write('x = ');readln(x);
   write('operator tambah/kurang/kali/bagi (+ or - or x or /) = ');readln(op);
   write('y = ');readln(y);
   if op = '+'
   then
       hasil := x+y
   else
       if op = '-'
       then//by BayuWPP
           hasil := x-y
       else
           if op = 'x'
           then
               hasil := x*y
           else
               hasil := x/y;
           {endif}
       {endif}
   {endif}
   writeln;
   //menampilkan penginputan oleh user
   writeln(x,' ',op,' ',y);
   //menampilkan hasil penghitungan
   write('hasil = ',hasil:0:2);
   readln;
//by BayuWPP
end.

Sekian pembahasan mengenai penyelesaian persoalan dan membuat Program Kalkulator Sederhana Pengitungan dengan 4 oerator (+,-,x,/) diantara 2 Angka yang Saya buat. Semoga bermanfaat bagi kita semua.

Wassalammualaikum Warahmatullahi Wabarakatuh !

[PENGUMUMAN]

Kami membutuhkan bantuan anda untuk mengisi survei singkat ini.
Tolong bantu ya untuk mengisi, gampang ko hanya mengisi nama, email sama 5 pertanyaan saja kawan. Bantu isi ya surveinya disini !!!.
Terimakasih. Semoga bantuan temen temen mendapat balasan yang berlipat ganda dari Allah SWT, Amin