Rabu, 21 November 2012

Program Kalkulator/Hitung Sederhana dengan Pascal

Bagi anda para mahasiswa mungkin sudah tidak asing lagi dengan yang namanya Program Pascal. Terutama bagi anda yang kuliah dengan jurusan yang berhubungan dengan komputer misalkan Teknik Informatika (seperti saya), Sistem Informatika, dan lainnya. Banyak mahasiswa yang menganggap program pascal itu sulit, ada juga yang menganggap pascal itu yaa lumayaannn, dan ada juga yang menganggap pascal itu sulit bahkan mereka tidak bisa mengaplikasikannya. Hal ini sebenarnya tergantung dari kita yang menjalaninya. Padahal sebenarnya program pascal itu tidak sesulit yang dikatakan beberapa mahasiswa tersebut jika anda ingin mempelajarinya dengan logika karena kuliah komputer itu yang terpenting adalah logika.
Berikut ini saya akan memberikan contoh program menggunakan operator seperti penjumlahan, pengurangan, perkalian dan pembagian. Berikut porgramnya :

uses wincrt;
var a,b,p,h:real;
     

begin
        writeln('Masukan Angka Pertama = ');read(a);
        writeln('Masukan Angka Kedua = ');read(b);
        writeln('==============================');
                        writeln('1. Penjumlahan');
                       writeln('2. Pengurangan');
                       writeln('3. Perkalian');
                       writeln('3. Pembagian');
         writeln('================================');
        writeln('Pilih Operasi Hitung : ');read(p);
             if p=1 then h:=a+b;
             if p=2 then h:=a-b;
             if p=3 then h:=a*b;
             if p=3 then h:=a/b;
 writeln('=================================');
writeln('Hasil Operasi Hitung Anda Adalah ',h:0:2);
end.



 Demikian contoh yang bisa saya berikan untuk saat ini. Yang lainnya insyaallah menyusul karena saya juga baru mahasiswa semester 1 yang masih awam program. Terima kasih.

Silahkan sampaikan saran dan komentar juga pertanyaan anda.



Related Post about pascal

8 komentar:

  1. masi error tuh
    coba dibenahin lagi

    BalasHapus
    Balasan
    1. oowwhh iya gan maaf ada yang ketinggalan ehehhe ..
      sudah ane benerin gan thanks atas sarannya ...

      Hapus
  2. Maaf,masih salah gan,mungkin aada yg kurang lagi gan,disini compilenya gk bisa gan

    BalasHapus
    Balasan
    1. bisa koq sdh saya coba lagi ..
      mungkin compile agan kali eheheh ..

      Hapus
  3. kok waktu di enter hasilnya malah balik ke free pascal lagi,,ndak keluar hasilnya,gimana tuh?

    BalasHapus
    Balasan
    1. waduunh saya gak ngerti nih maksudnya free pascal :D

      Hapus
    2. kalau pakai free pascal biasanya sebelum end. terakhir itu dikasih readln; . coba aja gmana hasilnya stelah pakai readln;

      Hapus
  4. Readln di akhir itu agar program tersebut bisa kita baca kan

    BalasHapus

W A R N I N G !!!
=Pembaca yang Baik selalu Meninggalkan Komentar=

~ Berkomentarlah secara baik dan sopan maka admin akan merespon
~ JANGAN ANONIM
~ Komentar Sesuai dengan Topik Pembicaraan
~ Tidak Menyertakan Link Aktif
~ Dilarang Promosi dalam Bentuk Apapun !

Related Posts Plugin for WordPress, Blogger...