Sabtu, 14 Februari 2009

Membuat Program Faktorial dengan Turbo Pascal

Share
Sebelumnya, saya jelaskan dulu apa itu faktorial.

Faktorial biasanya ditulis dengan N!
N itu bisa berarti 1, 2, 7, 22, pokoknya angka. Jadi, faktorial 5 ditulis dengan 5!
Faktorial itu artinya mengalikan suatu bilangan dengan bilangan-bilangan sebelumnya hingga akhirnya dikalikan dengan angka 1.

Contohnya :
Faktorial dari 6 :

6*5*4*3*2*1 = 720


Jadi, sudah jelas gimana faktorial itu?
Catatan :
* artinya x (kali)

Kalau belum, coba deh diulang lagi bacanya.

Kalau sudah jelas, coba dibayangin kira-kira gimana sih algoritma nya?

Nah, kalau algoritma nya udah kebayang, Insya Allah bisa buat programnya.

Oh, ya, hampir lupa. Program ini menggunakan function.

Inilah algoritma nya :






Program Faktorial_pascal;
uses crt; {atau uses wincrt;}
function Faktorial(a:integer):longint;
begin
if (A=1)then
Faktorial:=1
else
Faktorial:=a*faktorial(a-1);
end;
var
x:integer;
begin
clrscr;
writeln('Faktorial Sequence');
writeln;
write('Berapa Faktorial : ');readln(x);
writeln(x,' faktorial ','= ',faktorial(x));
writeln;
write('Tekan Sembarang Tombol untuk keluar...');
readln;
end.



Minggu, 08 Februari 2009

Trik Menyalin Listing Program Turbo Pascal

Share
Mungkin udah banyak yang tahu, ya? Hhi… sekadar trik tambahan buat yang belum tahu aja. Begini caranya untuk menyalin listing program tanpa perlu repot-repot nulis lagi.

1. Copy listing program yang ingin disalin ke dalam notepad
2. Simpan dengan nama "terserah-anda-mau-nama-apa-saja.pas" tanpa tanda petik
3. Buka TPX.EXE
4. Klik ‘File->Open’ atau tekan F3
5. Cari file yang Anda simpan tadi dan klik open
6. Jreeeng - jreeeeng…. udah selesai deh proses co-pas nya.

Sekarang nggak susah lagi kan kalau mau nyalin listing pogram dari internet? :-D

Struktur Program Pascal

Share

Secara singkat, struktur program pascal terdiri dari :

1. Judul program

2. Blok program

  1. Bagian deklarasi
  • deklarasi variabel
  • deklarasi tipe
  • deklarasi konstanta
  • deklarasi label
  • deklarasi prosedur
  • deklarasi fungsi

2. Bagian pernyataan

Penjelasan :

  • Bagian judul harus diletakkan di awal program (paling atas) dan diakhiri dengan titik koma (;). Namun, sebenarnya sebuah program boleh saja jika tidak menggunakan judul, karena tidak terlalu penting, hanya agar rapi saja. Judul program itu contohnya :
      program Coba_coba;
  • Deklarasi variabel biasanya digunakan di setiap program. Hampir setiap program memerlukannya. Kata var digunakan sebagai judul di bagian deklarasi variabel dan diikuti oleh satu atau lebih pengenal (identifier) yg dipisahkan oleh tanda koma (,) diikuti dengan tanda titik dua ( : ) lalu tipe data dan diakhiri dengan titik koma (;).

Contoh :

      var
nama, alamat : string;
umur, tanggal lahir : integer;
  • Untuk deklarasi tipe, lebih baik kita mulai dari contoh nya :
  • type
    pecahan = real;
    bulat = integer;
    huruf = string;
    karakter = char;
    logika = boolean;
    var
    nama : huruf;
    sekolah : logika;
    umur : pecahan;
    predikat : karakter;

Sekarang jelas bahwa deklarasi tipe digunakan untuk membuat nama lain dari identifier, sehingga dapat memudahkan dalam mengingat tipe data saat membuat variabel. Deklarasi tipe diawali dengan kata type, simbol yang digunakan adalah tanda sama dengan (=), dan diakhiri dengan titik koma (;).

  • Untuk menetapkan sesuatu yang mutlak dan tidak dapat diubah, kita dapat menggunakan deklarasi konstanta. Deklarasi konstanta diawali dengan kata Const, menggunakan tanda sama dengan (=), dan diakhiri dengan titik koma (;).

Contoh :

     const
gaji = 200000;
utang = 50000;
  • Jika program Anda ingin loncat dari baris yang satu ke baris yang lain, maka Anda memerlukan goto dan deklarasi label untuk mewujudkannya. Pendeklarasian label diawali dengan kata label diikuti oleh identifier label dan diakhiri dengan titik koma (;).

Contoh :

     label
pertengahan, 300, selesai;
begin
writeln('halo');
goto 300;
writeln('saya');
goto pertengahan;
writeln('pascal');
writeln('^_^');
goto selesai;
300:
writeln('nama');
pertengahan:
writeln('program');
selesai;
end.

Untuk pendeklarasian yang lain (deklarasi prosedur dan fungsi) Insya Allah akan saya muat di artikel berikutnya karena sudah lebih spesifik.

Terima kasih :-)

Membuat Program Biodata Sederhana dengan Turbo Pascal

Share
Tertarik sama Turbo Pascal ?
Kalau belum download silahkan di-download file nya (Turbo Pascal 7.1) disini.
Jika Anda sudah download, silakan buka folder BIN->TPX.EXE
TPX.EXE inilah yang merupakan Turbo Pascal 7.1 nya.


Jika sudah diklik, maka keluarlah Turbo Pascal yang ditunggu-tunggu itu .


Silakan dicoba listing program sederhana di bawah ini :
program biodata;
uses crt; {atau uses wincrt;}
var
nama, alamat : string;
umur         : integer;
begin
clrscr;
writeln('===========================================');
writeln('                  Biodata');
writeln('===========================================');
write('Nama     : '); readln(nama);
write('Umur     : '); readln(umur);
write('Alamat   : '); readln(alamat);
writeln('-------------------------------------------');
writeln('Jadi data Anda : ');
writeln('Anda bernama ',nama,'. Umur Anda ',umur,' tahun. Anda tinggal di ',alamat,'.');
writeln;
readkey;
end.
Program di atas adalah sebuah program biodata, langsung tulis saja di programnya *capek, nggak sih nulisnya?*. Sebenarnya ada cara yang lebih mudah untuk menyalin listing program di atas ke TPX nya, baca di sini.
Kalau sudah ditulis semua, silakan compile program tersebut untuk melihat hasilnya.
Cara meng-compile nya sebagai berikut :
  1. Klik RUN
  2. Klik Run
Hwhwhwh… cara yang lebih mudah yaitu hanya dengan menekan tombol Ctrl + F9.
Udah kelihatan kan hasilnya?
Nah coba dicermati dulu…. penjelasannya ada di bawah :
  • ‘Uses Crt’ merupakan salah satu unit di pascal. Unit yang satu ini harus digunakan jika ingin menggunakan perintah ‘clrscr’ (perintah untuk membersihkan layar) dan ‘readkey’ (perintah untuk membaca masukan user).
  • ‘Var’ merupakan bagian pendeklarasian variabel yang di dalamnya memuat tipe-tipe data, seperti string, integer, byte, word, char, dll. Mengenai tipe-tipe data akan dibahas di artikel selanjutnya.
  • Setiap listing program utama harus diawali dengan huruf ‘begin’ dan diakhiri dengan ‘end.’ (ingat! jangan lupa titik(.) nya pada end.)
  • Perintah untuk mencetak adalah ‘write’. Jadi kalau mau mencetak “Halo, saya pascal” yaitu dengan perintah :


    write('Halo, saya pascal')
    Tapi selain write, ada juga perintah ‘writeln’. Bedanya kalau ‘write’ setelah mencetak kursornya tetap disamping, sedangkan kalau ‘writeln’ kursornya ke bawah. Untuk contohnya dapat dicermati dari listing program tadi.


  • Perintah ‘read’ dan ‘readln’ digunakan untuk membaca input yang dimasukkan user. Perbedaan antara keduanya sama dengan ‘write’ dan ‘writeln’.
  • Jangan lupa untuk menuliskan tanda titik dua (;) di setiap akhir baris program.
Mengertikah? Atau bingugkah? O_o
Yah… wajar sih kalau Anda nggak ngerti, soalnya saya kan nggak pintar nulis :-P
Sekian dulu… *ternyata capek juga nulisnya* :-)

Pengenalan Program Turbo Pascal

Share

Pascal adalah sebuah bahasa pemrograman yang pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971. Dengan mengambil nama dari matematikawan Perancis, Blaise Pascal, yang pertama kali menciptakan mesin penghitung, Profesor Niklaus Wirth membuat bahasa Pascal ini sebagai alat bantu untuk mengajarkan konsep pemrograman komputer kepada mahasiswanya. Selain itu, Profesor Niklaus Wirth membuat Pascal juga untuk melengkapi kekurangan-kekurangan bahasa pemrograman yang ada pada saat itu, sehingga pascal mempunyai banyak kelebihan-kelebihan diantaranya :

  • Tipe Data Standar, tipe-tipe data standar yang telah tersedia pada kebanyakan bahasa pemrograman. Pascal memiliki tipe data standar seperti : boolean, integer, real, char, string, word.
  • User defined Data Types, programmer dapat membuat tipe data lain yang diturunkan dari tipe data standar.
  • Strongly-typed, programmer harus menentukan tipe data dari suatu variabel, dan variabel tersebut tidak dapat dipergunakan untuk menyimpan tipe data selain dari format yang ditentukan.
  • Terstruktur, memiliki sintaks yang memungkinkan penulisan program dipecah menjadi fungsi-fungsi kecil (procedure dan function yang merupakan program kecil di dalam program) yang dapat dipergunakan berulang-ulang.
  • Sederhana dan Ekspresif, memiliki struktur yang sederhana dan sangat mendekati bahasa manusia (bahasa Inggris) sehingga mudah dipelajari dan dipahami.

Hebatnya lagi, bahasa PASCAL masih digunakan sebagai standar bahasa pemrograman TOKI (Tim Olimpiade Komptuter Indonesia) dan IOI (International Olympiad in Informatics), lho…

Contoh program Pascal yang paling sederhana yaitu :

Program program_pertamaku;
begi
end.

Nah, program diatas merupakan program paling sederhana dari bahasa Pascal.

Program program_pertamaku;

Baris program di atas merupakan bagian judul program. Setiap program tidak diharuskan menggunakannya, biasanya sih seorang programmer menggunakannya hanya agar listing programnya kelihatan rapi.
Tapi saya sangat sarankan untuk menggunakannya, kan enak kalau rapi ;-)


begin

end.

Bagian di atas merupakan bagian program utama, di sini lah programmer menuliskan perintah - perintah nya.

Jika program ini di-compile, hasilnya tidak ada apa-apa karena di bagian program utama tidak diisi apapun.

Selain bagian judul program dan program utama, bagian penting lainnya yaitu bagian deklarasi.

Karena program yang sedang kita bahas adalah program yang paling sederhana, maka tidak memerlukan deklarasi.

Namun, setahu saya semua program memerlukan bagian deklarasi, baik itu deklarasi variabel, konstanta, tipe, dan label.

Wah2.. Rumitkah? Kalau Anda menganggapnya rumit ya rumit, tapi kalau Anda menganggapnya nggak rumit ya nggak rumit. Yang pasti nggak usah dijaiin rumit, lah. Kalau kita berusaha Insya Alah bisa :-D

Hmm…. apa saya sudah terlalu jauh ngebahas nya pada pengenalan ini, ya?

Oke, deh…. selebihnya akan saya lanjutkan di artikel2 berikutnya.

Mau Langsung Diberitahu Kalau Ada Artikel Baru di Feethree Blog?


Masukkan email Anda:

Didukung oleh FeedBurner

Feethree Blog