Contoh Pemrograman Dasar Komputer Dengan Pascal

Pada bagian Pemrograman dasar pascal, kita akan membahas Contoh Program Komputer tentang perhitungan matematika dasar.  Dalam perhitungan matematika, kita menggunakan operator aritmatika sebagai berikut :

Penjelasan :

Operator tanda kurung adalah priorotas pertama, artinya bagian yang berada dalam tanda kurang akan dikerjalan pertama kali, kemudian diikuti oleh operator dengan prioritas kedua yaitu kali dan bagi (*dan /), kemudan tambah dan kurang . Dalam  perhitungan matematika, tanda sama dengan menggunakan tanda  := (titik dua sama dengan) untuk menyatakan nilai.

 Operator Div digunakan untuk membagi 2 bilangan  bulat (integer) kemudian mengambil  hasil bagi dan sisanya dibuang. Sedangkan operator Mod digunakan untuk membagi 2 bilangan bulat (integer) kemudian mengambil sisanya dan hasil baginya dibuang. 

Misalnya : 7 dibagi 2. Hasil baginya 3 dan sisanya 1.
X:= 7 div 2, hasilnya 3
X:= 7 mod 2, hasilnya 1

Tipe Data

1.  Integer    : untuk menyatakan bilangan bulat. Misalnya : 1, 2, 3, dst. Tipe Integer terdiri dari dari 5 macam  yaitu :
2.  Real        : untuk menyatakan bilangan desimal. Misalnya : 1.45, 5.76, dst. Pemisah tanda desimal menggunakan  titik bukan  koma. Tipe real dibagi menjadi 4 macam yaitu   :


Format Output Tipe Real

Output dari variabel bertipe real berupa bilangan desimal dengan 10 angka di belakang koma dan E+0n, dimana n =1,2,3, dst. Misalnya 1.6000000000E+02, artinya sama dengan 1.6 x 10 pangkat 2.
Untuk menampilkan output yang rapi, maka perlu diformat dengan bentuk sbb:

V:N:D dimana V adalan nama variabel, N adalah jumlah digit, dan D adalah jumlah desimal.

Contoh : X:6:2

artinya nilai variabel x terdiri dari 6 digit dan 2 angka dibelakang koma. Misalnya  094.32 tetapi 0 tidak dicetak sehingga tampilan output adalah 94.32.

3.  Char        : untuk menyatakan huruf, karakter dan tanda baca

Tipe data tunggal yang berhubungan dengan tombol-tombol di keyboard. Char adalah semua tombol yang terdapat pada keyboard atau lebih lengkapnya semua karakter yang terdapat pada kode ASCII.
Apabila data Char ingin dijadikan sebagai konstanta maka karakter yang harus diapit dengan tanda kutip satu.   Misalnya  :Huruf := ’A’

4.  String   : untuk menyatakan kata atau kalimat

String (adalah kumpulan type data yang berbentuk karakter). Tipe data string digunakan untuk menampung nilai dalam bentuk huruf, dimana batas maximal adalah sebanyak 255 karakter. Apabila data string ingin dijadikan sebagai konstanta maka data string yang harus diapit oleh tanda kutip satu.   Misalnya  : data:= ’Program Komputer’

5. Boolean    : untuk menyatakan benar(true) atau salah (false)

Mempunyai nilai benar / salah. Operator yang penghubung untuk tipe boolean adalah : =, > , <, <=, =>, <>;. Boolean akan menghasilkan false jika nilai = 0 dan akan menghasilkan true jika nilai = 1. Tipe boolean biasanya digunakan dalam operasi kondisional pada saat pengambilan keputusan Ya atau Tidak dengan menggunakan fungsi IF – Then – else.

Variabel 

Dalam perhitungan matematika, variabel adalah komponen yang sangat penting untuk digunakan. Karena itu, setiap masalah harus dianalisa dengan baik agar dapat menentukan jenis variabel dan tipe data yang akan digunakan. Variabel yang akan digunakan harus dideklarasikan lebih dahulu pada bagian deklarasi variabel.

Contoh Deklarasi Variabel :

Var       
a,b      : integer;
X,y,z     : real;
Huruf     : char;
Kata     : string[25]; artinya panjang kata atau kalimat maksimum 25 karakter. Jika tidak disebutkan maka panjangnya 255 karakter.

 Contoh Program  Komputer Untuk Perhitungan Matematika Sederhana

Contoh-1

Buatlah program dengan persaman  matematika :   Y = 2x + (8x – 25)

Jawab :

Dari persamaan di atas terdiri dari 2 buah variabel yaitu x dan y. Variabel  x adalah variabel  input dan y adalah variabel output. Tipe variabel boleh  integer atau real. Seperti pada pembahasan sebelumnya bahwa Langkah pertama adalah membuat algoritma, kemudian flowchart, dan membuat kode program.

Algoritma :
  •     Mulai
  •     Deklarasikan variabel
  •     Tentukan nilai x
  •     Hitung nilai Y
  •     Cetak x dan y.
  •     Selesai

Flow Chart



Kode Contoh Program Komputer

Program Contoh1;
uses crt;

var x,y : integer;

Begin
     clrscr;
     write('Input Nilai x = ');
     readln(x);
     y:= 2*x + (8*x -25);
     writeln;
     writeln(' Y = ',y);
     readln;
End.








Output Program:

Contoh 2

Buatlah program untuk mencari nilai a dari persamaan  a = (b + 3c)b – bcd

Jawab :

Persamaan di atas terdiri dari 4 buah variabel yaitu a,b,c,dan d. Gunakan tipe data integer jika input datanya berupa bilangan bulat saja. Jika ada input data berupa bilangan desimal, maka harus menggunakan tipe data real.

Algoritma :
  •     Mulai
  •     Deklarasikan variabel
  •     Input nilai b,c,d
  •     Hitung nilai a
  •     Cetak nilai a,b,c,d.
  •     Selesai
Flowchart

Kode Contoh Program Komputer

Program Contoh2;
uses crt;

var a,b,c,d : real;

Begin
     clrscr;
     write('Input Nilai b = ');readln(b);
     write('Input Nilai c = ');readln(c);
     write('Input Nilai d = ');readln(d);
     a:= (b + 3*c)*b - b*c*d;
     writeln;clrscr;
     writeln(' b = ',b:6:2,'   c = ',c:6:2,'  d = ',d:6:2);
     writeln;
     writeln(' Hasil Perhitungan, a = ',a:6:2);
     readln;
End.





Ouput Program


Contoh-3

Buatlah program untuk menghitung persamaan    y= □(√(a^2+b^2 )/4b)

Jawab :

Persamaan di atas terdiri dari 3 buah variabel yaitu y, a, dan b. Variabel y harus bertipe real karena y akan menyimpan hasil pembagian bilangan, dimana hasil pembagian akan berbentuk bilangan desimal. Sedangkan variabel a dan b, bisa bertipe real atau integer. Artinya jika integer, maka a dan b hanya dapat menerima bilangan bulat saja.

Algoritma :

  • Mulai
  • Deklarasikan variabel
  • Input nilai a dan b
  • Hitung nilai  x= √(a^2+b^2 )
  • Hitung nilai  y=x/4b
  • Cetak Nilai  y
  • Selesai
Flowchart


Dalam program Pascal terdapat fungsi :
Sqrt (x)  :  digunakan untuk menghitung nilai akar pangkat dua dari x
Sqr(x)    :  digunakan untuk menghitung nilai pangkat dua dari x

Kedua fungsi tersebut akan kita gunakan dalam program untuk menyelesaikan persamaan.

Kode Contoh Program Komputer

Program Contoh3;
uses crt;

var y,x,a,b : real;

Begin
     clrscr;
     write('Input Nilai a = ');readln(a);
     write('Input Nilai b = ');readln(b);

     x := sqrt(sqr(a) + sqr(b));
     y := x/(4*b);

     writeln;writeln;
     writeln(' a = ',a:6:2,'   b = ',b:6:2);
     writeln;
     writeln(' Y = ',y:6:2);
     readln;
End.

Hasil  Program:


Contoh Program Komputer-4

Buatlah program untuk membagi 2 bilangan bulat dengan operator Div dan Mod.

Jawab :

Div dan Mod hanya dapat membagi bilangan bulat, sehingga variabel yang digunakan harus bertipe integer.

Algoritma :
  • Mulai
  • Deklarasikan variabel  x,y,n,m
  • Input 2 bilangan bulat
  • Hitung  n = x mod y dan m = x div y
  • Cetak hasilnya
  • Selesai

Flowchart : sama dengan contoh di atas.

Kode Contoh Program Komputer


Program Contoh4;
uses crt;

var y,x,n,m : integer;

Begin
     clrscr;
     write('Input Nilai x = ');readln(x);
     write('Input Nilai y = ');readln(y);

     n:= x mod y;
     m := x div y;

     writeln;writeln;
     writeln(' x = ',x,'   y = ',y);
     writeln;
     writeln(' x mod y = ',n);
     writeln(' x div y = ',m);
     readln;
End.

Hasil Program:


Contoh Program Komputer-5:

Buatlah program untuk menampilkan huruf, kata atau kalimat.

Jawab :

Untuk menampilkan huruf, maka tipe variabelnya adalah char sedangkan kata atau kalimat tipe variabelnya adalah string.

Algoritma :
    Mulai
    Deklarasikan Variabel
    Inpit huruf dan kata/kalimat
    Tampilkan/cetak hasilnya
    Selesai

Kode Contoh Program Komputer


Program Contoh5;
uses crt;

var huruf : char;
    kata  : string;

Begin
     clrscr;
     write('Input Huruf        = ');readln(huruf);
     write('Input Kata/Kalimat = ');readln(kata);

     writeln;writeln;
     writeln(' Data Char   = ',huruf);
     writeln(' Data String = ',kata);
     readln;
End.

Hasil Program


Dengan contoh program komputer yang sederhana di atas dengan bahasa Pascal. Saya harap anda semua yang masih pemula  dapat mengerti dan memahami dengan baik pemrograman dasar komputer dengan bahasa Pascal.Dengan mengerti konsep-konsep dasar pemrograman ini, maka materi selanjutnya akan lebih mudah diikuti. Materi berikutnya adalah Contoh Program Komputer tentang Logika Pengambilan Keputusan, umumnya disebut Percabangan.

Mohon anda memberikan komentar, saran, atau pertanyaan untuk memperbaiki materi yang ada dalam blog ini. Dengan demikian blog ini dapat semakin bermanfaat bagi para pelajar dan mahasiswa yang ingin mempelajari contoh program komputer yang dimuat di blog ini.

Semoga bermanfaat.
God bless you all.


18 comments:

  1. Teman - teman kesulitan untuk Belajar Komputer karena kesibukan? kini kami memfasilitasi kursus komputer jarak jauh via online, silahkan kunjungi website kami di asianbrilliant.com, Kursus Online

    Ayah, Bunda..butuh guru untuk mengajar anak-anak dirumah ? kami memfasilitasi 1000 guru untuk anak-anak ayah dan bunda datang kerumah, silahkan kunjungi website kami di smartsuksesprivate.com,Bimbingan Belajar,Les Private

    ReplyDelete
  2. makasih gan, atas ilmu nya izin save, maklum baru belajar pascal

    ReplyDelete
  3. Thank gan sharing ilmu nya bermanfaat bagi saya ,, {Computer And Networking http://www.sepkomdangan.ga/

    ReplyDelete
  4. hebat ilmu nya bermanfaat sekali

    ReplyDelete
  5. thanks ya.......untuk ngeshare ilmunya bermanfaat banget

    ReplyDelete
  6. thanks ya artikelnya bermanfaat banget ^^
    www.rajalistrik.com

    ReplyDelete
  7. thanks ya artikelnya
    www.m-barsal.blogspot.com

    ReplyDelete
  8. makasih gan artikelnya.. bermanfaat

    ReplyDelete
  9. makasih gan artikelnya.. bermanfaat

    ReplyDelete
  10. kalau untuk yang pemula gmana?

    ReplyDelete
  11. untuk pemula, langkah pertama adalah download program free pascal lebih dahulu. Cari di google dengan kata kunci "downlaod free pascal". Kemudian install dan mulai belajar. Anda bisa gunakan contoh dalam blog ini. Selamat mencoba

    ReplyDelete

Silakan memberikan komentar dan pertanyaan yang sifatnya positif.