Selasa, 20 Desember 2011

Konversi Bilangan





1. Konversi biner ke desimal
Yaitu dengan cara mengalikan masing-masing bit dalam bilangan dengan position valuenya. 
 
Contoh :
1 0 0 12                                  1 x 2 0 = 1
                                               0 x 2 1 = 0
                                               0 x 2 2 = 0                               
                                               1 x 2 3  = 8  kemudian dijumlahkan


Bilangan desimal                         1810
Algoritama konversi bilangan biner ke desimal:
1.    Mulai
2.    Baca biner
3.    Desimal=desimal div 10
4.    Sisa= desimal mod 10
5.    Desimal=desimal+sisa*b
6.    b= b*2
7.    jika biner 0 pergi ke 1
8.    pergi ke 3
9.    cetak desimal 10. selesai

Array



Sekarang tiba saatnya kita mempelajari tentang array. Sebelum mempelajari array lebih lanjut perlu kita tahu definisi array itu sendiri.








Array adalah tipe data terstruktur yang terdiri dari sejumlah komponen-komponen yang mempunyai tipe sama. Komponen-komponen tersebut disebut sebagai komponen type, larik mempunyai jumlah komponen yang jumlahnya tetap. Banyaknya komponen dalam larik ditunjukkan oleh suatu index, dimana tiap komponen di array dapat diakses dengan menunjukkan nilai indexnya atau subskript. Array dapat bertipe data sederhana seperti byte, word, integer, real, bolean, char, string dan tipe data scalar atau subrange. Tipe larik mengartikan isi dari larik atau komponen- komponenya mempunyai nilai dengan tipe data tersebut.

Deklarasi Array.
Array dideklarasikan pada bagian deklarasi. Deklarasi umum dari array adalah

Ini contoh Program Pascal bagian 6



CONTOH PROGRAM BENTUK BINTANG DENGAN ANGKA

program seling;
uses wincrt;
var i,j,n:integer;
a:string;        
begin
write ('banyak baris ');
readln (n);
for i:=1 to n do
begin
for j:=1 to i do
begin
if (j mod 2)=1 then
a:='*' else a:='1';
write(a,' ');
end;
writeln;end;
end.

Lanjutkan menuju contoh Program Pascal bagian 5




CONTOH PROGRAM BINTANG PIRAMIDA
uses wincrt;
var
a,b,c,d:integer;
begin
write('masukkan jumlah baris bintang yang akan ditampilkan:');readln(a);
for b:= 1 to a do
begin
for c:= a downto b do
write(' ');
for d:= 1 to b+b-1 do
write('*');
writeln;
end;
end.
tampilan :


Kita menuju ke contoh Program Pascal bagian 4

 
 
CONTOH PROGRAM PERMUTASI DAN KOMBINASI

program permutasi_kombinasi;
uses wincrt;
var
a,b,a_k,kombinasi,permutasi:real;
i,n,k:longint;
begin
writeln('MENGHITUNG PERMUTASI DAN KOMBINASI:');
write('masukkan bilangan n= ');readln(n);
write('masukkan bilangan k= ');readln (k);

Kali ini akan diberikan contoh Program Pascal bagian 3



CONTOH PROGRAM FAKTORIAL PAKAI FOR TO DO

program faktorial;
uses wincrt;
var
i,n,f:integer;
begin
readln(n); f:=1;
for i:=1 to n do
    begin
    f:=f*i;
    end;
    writeln(n,' faktorial = ',f);
end.

Berikut ini adalah contoh Program Pascal bagian 2



 
CONTOH PROGRAM STATISTIKA DESKRIPTIF
program statistika_deskriptif;
uses wincrt;
var n,i,j,tengah:integer;
a:real;
data:array [0..100] of real;

begin
writeln('SELAMAT DATANG DI PROGRAM STATISTIKA DESKRIPTIF');WRITELN('***==========================***');writeln;
writeln('Berapa jumlah data yang ingin anda dimasukan? (max 100)');
write('silahkan masukan data:');
READLN(N); WRITELN;
{syntax untuk memasukkan data dalam array}
for i:=1 to n do

Contoh Program Pascal 1

CONTOH PROGRAM PELUANG BINOMIAL
program binomial;
uses wincrt;
var
i,j,k,n,x:longint;
a,b,c,d,e,p:real;
begin
writeln('nilai n = ');readln(n);
writeln('nilai x dari n = ');readln(x);
writeln('peluang sukses p = ');readln(p);

Senin, 19 Desember 2011

Struktur Program




Pada Bahasa Pemrograman Turbo Pascal terdapat struktur program, di mana struktur program tersebut terdiri atas :
1. Kepala Program
2. Bagian Deklarasi
3. Bagian Program Utama
Ketiga hal di atas mempunyai bentuk umum :
Kata-kata yang bergaris bawah pada bentuk umum di atas adalah kata-kata tercadang dalam Turbo Pascal (Reserved Word). Kepala program adalah bagian yang menyatakan

Beberapa Statemen Turbo Pascal




Statemen adalah perintah untuk pengerjaan program pascal. Statemen terletak di bagian deklarasi. Statemen dengan diawali oleh kata cadangan BEGIN dan diakhiri dengan kata cadangan END. Akhir dari setiap statemen diakhiri dengan titik koma [;].
Statemen-statemen dalam bahasa Pascal terdiri dari pernyataan yang berupa fungsi dan prosedur yang telah disediakan sebagai perintah standar Turbo Pascal.

1.  Statemen-statemen yang digunakan untuk input/output.
a. Read/Readln [prosedur].
Perintah ini

Dasar Program Pascal




 Unsur-unsur Pemrograman
a. Mendapatkan data dengan membaca data dari default input (key board, file atau sumber data lainnya).
b. Menyimpan data ke dalam memori dengan struktur data yang sesuai,
c. Memproses data dengan instruksi yang tepat.
d. Menyajikan atau mengirimkan hasil olahan data ke default output (monitor, file atau tujuan lainnya).


1. Identifier
Nama yang dipergunakan di dalam

Minggu, 18 Desember 2011

Apa sih Pascal itu...???




Pascal adalah bahasa tingkat tinggi yang orientasinya pada segala tujuan, dirancang oleh Prof. Niklaus Wirth dari Technical University di Zurich, Switzerland. Nama pascal diambil sebagai penghargaan terhadap Blaise Pascal, ahli matematik dan philosiphi terkenal abad 17 dari Prancis. Profesor Niklaus Wirth memperkenalkan kompiler bahasa Pascal pertama kali untuk komputer CDC 6000 (Control Data Corporation) yang dipublikasikan pada tahun 1971 dengan tujuan untuk membantu mengajar program komputer secara sistematis, khususnya pemrograman terstruktur. Pada perkembangannya
banyak versi-versi pascal yang beredar, MS-Pascal, Apple Pascal, Turbo Pascal, dll. Gua pernah baca kalo pascal itu di buat karena bahasa C terlalu sulit untuk di pelajari untuk pemula.

Sejarah Pascal




Pascal adalah bahasa tingkat tinggi (high level language) yang orientasinya pada segala tujuan, dirancang oleh Profesor Niklaus Wirth dari Technical University of Zurich, Switzerland. Nama Pascal diambil sebagai penghargaan terhadap Blaise Pascal, ahli matematik dan filosofer terkenal abad 17 dari Perancis.
Profesor Niklaus Wirth memperkenalkan