- In: pascal | pemrograman | tutorial
- 8 Comments
Sebelumnya, saya jelaskan dulu apa itu faktorial.
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 source code nya :
Program Faktorial_pascal;
uses crt;
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.
- In: pascal | pemrograman | tutorial
- 14 Comments
Secara singkat, struktur program pascal terdiri dari :
1. Judul program
2. Blok program
- 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 🙂
- In: pascal | pemrograman | trik | tutorial
- 10 Comments
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.
- Copy listing program yang ingin disalin ke dalam notepad
- Simpan dengan nama <terserah anda mau nama apa>.pas
- Buka TPX.EXE
- Klik ‘File->Open’ atau tekan F3
- Cari file yang Anda simpan tadi dan klik open
- Jreeeng – jreeeeng…. udah selesai deh proses co-pas nya.
Sekarang nggak susah lagi kan kalau mau nyalin listing pogram dari internet? 😀
Bag.1 : Contoh Program Sederhana
Posted 27 Januari 2009
on:- In: pascal | pemrograman | tutorial
- 14 Comments
Tertarik sama Turbo Pascal ?
Kalau belum download silahkan di-download file nya (Turbo Pascal 7.1) dari 4shared.
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; 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.
Turbo Pascal : Sebuah Pengenalan
Posted 26 Januari 2009
on:- In: pascal | pemrograman | tutorial
- 9 Comments
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; begin end.
Nah, program diatas merupakan program paling sederhana dari bahasa Pascal.
Program program_pertamaku;
We Will Not Go Down Lyric
Posted 25 Januari 2009
on:- In: lirik lagu | mp3
- 2 Comments
A blinding flash of white light
Lit up the sky over Gaza tonight
People running for cover
Not knowing whether they’re dead or alive
They came with their tanks and their planes
With ravaging fiery flames
And nothing remains
Just a voice rising up in the smoky haze
We will not go down
In the night, without a fight
You can burn up our mosques and our homes and our schools
But our spirit will never die
We will not go down
In Gaza tonight
Women and children alike
Murdered and massacred night after night
While the so-called leaders of countries afar
Debated on who’s wrong or right
But their powerless words were in vain
And the bombs fell down like acid rain
But through the tears and the blood and the pain
You can still hear that voice through the smoky haze
We will not go down
In the night, without a fight
You can burn up our mosques and our homes and our schools
But our spirit will never die
We will not go down
In Gaza tonight
A song for Gaza by Michael Heart
Download ‘We will not Go Down’ from the official site of Michael Heart.
Celoteh Terakhir