Array

Array adalah tipe data terstruktur yang terdiri dari sejumlah komponen dalam jumlah tetap yang mempunyai tipe sama.

Banyaknya komponen dalam larik ditunjukkan oleh suatu index, dimana tiap komponen di array dapat diakses dengan menunjukkan nilai indexnya atau subskript.

Tipe larik mengartikan isi dari larik atau komponen- komponenya mempunyai nilai dengan tipe data tersebut.

Contoh:

Var Untai : array[1..50] of Integer; 

Pada contoh Array dengan nama untai telah dideklarasikan dengan tipe integer, dengan jumlah elemen maksimum 50 elemen, nilai dari elemen array tersebut diatas harus bertipe integer.

Contoh Program :

Program Contoh_Array_Input; 

Uses WinCrt;

Var  

Bilangan : array[1..50] of Integer;

Begin  

ClrScr;  

Bilangan[1]:=3;

Bilangan[2]:=29;

Bilangan[3]:=30;

Bilangan[4]:=31;

Bilangan[5]:=23;  

Writeln('nilai varibel bilangan ke 3 =',Bilangan[3]);

End.

Untuk deklarasi array dapat digunakan beberapa cara seperti berikut ini :

Type  

Angka = String[20];

Var  

Nama : Array [1..50] of Angka;

Begin 

.

. 

End.

Deklarasi tipe indeks subrange integer Indeks pada array dapat tipe skalar atau subrange, tetapi tidak bisa real. 

Contoh:

Var  

Nilai : Array[1..10] of Integer;

Pada contoh ini array nilai mempunyai 10 buah elemen yaitu dari elemen ke-1 sampai 10.

Array tersebut dapat dideklarasikan dengan type seperti berikut ini :

Type  

Skala = 1..10;  

Var  

Nilai : Array [skala] of Integer;

atau

atau :

Type

Y = Array[1..10] of Integer;

Var

Nilai : Y;

atau : 

Type 

Skala = 1..10;

Y = Array[skala] of Integer;

Var 

Nilai : Y;

atau :

Const

Atas =1;

Bawah = 5;

type

Y = Array[Atas..Bawah] of Integer;

Var

Nilai : Y;

Deklarasi Type Indeks Skalar

Program Deklarasi_Indeks_Array_Skalar;

Uses WinCrt; 

Var  

Jum : Array[(jan,feb,mar,apr,mei)] of Integer;

Begin

Jum[jan]:=25;  

Jum[feb]:=45;  

Jum[mar]:=21;

Jum[apr]:=23;  

Jum[mei]:=50;  

Writeln('Jumlah nilai bulan maret =',Jum[mar]); 

End.

Deklarasi Konstanta Array

Array tidak hanya dapat berupa suatu varibel yang dideklarasikan di bagian deklarasi variabel, tetapi dapat juga berupa konstanta (const).

Program Contoh_Deklarasi_Array_Konstan; 

Uses Crt;

Const  

Tetap : Array[1..4] of Integer=(7,10,21,20);

Var

i : Integer;

Begin  

For i:= 1 to 4 Do  

Writeln('Nilai Konstan array ke ',i:2,' =',Tetap[i]);

End.

Konstanta array dapat juga berupa ketetapan dalam bentuk karakter seperti berikut.

Program Contoh_Konstan_Array_Char_;

Uses 

WinCrt; 

Const  

Huruf : Array[1..6] of Char=('A','B','C','D','E','F');

Var

i : Integer;

Begin  

For i:= 1 to 6 Do  

Writeln('Nilai konstan array ke',i:2,' = ',Huruf[i]);

End.

Dalam pascal string merupakan array dari elemen- elemen karakter seperti berikut :

Program String_Adalah_Array_Tipe_Char; 

Uses WinCrt;

Var  

Nama : string; 

i : Integer; 

Begin  

Nama:='Turbo Pascal';

For i:= 1 to Length(nama) Do  

Writeln('Elemen ',i,' dari ',Nama,'= ',Nama[i]);

End

Looping

For...Do

Perintah For . . . Do digunakan untuk melakukan perulangan determinitif.

Artinya sebuah pernyataan (tunggal atau majemuk) akan dikerjakan secara berulang-ulang sebanyak n kali, dimana n adalah sebuah bilangan yang telah diketahui sebelumnya.

Syntax 1 :

For NamaVarCounter := Awal To Akhir Do

Statement;

Syntax 2 :

For NamaVarCounter := Awal To Akhir Do

Begin

Statement1;

Statement2;

.........;

End;

Syntax 3 :

For NamaVarCounter := Awal DownTo Akhir Do

Statement;

Syntax 4 :

For NamaVarCounter := Awal DownTo Akhir Do

Begin

Statement1;

Statement2;

.........;

End;

Statement atau Block Statement akan dikerjakan selama nilai NamaVarCounter dari Awal ke Akhir dengan kenaikan / penurunan satu langkah.

Jika Awal lebih kecil dari Akhir digunakan perintah To, sedangkan jika Awal lebih besar dari Akhir digunakan perintah DownTo.

While...Do

Bila banyaknya perulangan suatu pernyataan belum bisa diketahui, maka perintah For ... Do tidak bisa digunakan

Untuk itu, perintah yang digunakan salah satunya adalah While . . . Do.

Syntax 1 :

While Do
Statement;

Syntax 2 :
While Do
Begin
Statement1;
Statement2;
.........;
End;


Syarat Logika adalah suatu relasi yang selama relasi itu bernilai TRUE maka statement / block statement akan terus-menerus dikerjakan.
Statement / block statement akan berhenti dikerjakan jika syarat logika tidak lagi benar.

Repeat...Until
Perintah Repeat . . . Until mirip dengan perintah While . . . Do, yaitu untuk melakukan perulangan jika banyak perulangan yang akan dikerjakan belum diketahui.

Syntax :

Repeat
Statement1;
Statement2;
.........;
Until 
 

Perbedaan Repeat...Until dengan While...Do

Pada Repeat . . . Until statement akan dikerjakan secara berulang-ulang sampai kondisi logika bernilai TRUE. Dengan demikian selama kondisi bernilai FALSE, maka perulangan akan terus dilakukan.

Pada Repeat . . . Until, pemeriksaan kondisi untuk menentukan benyaknya perulangan setelah statement dikerjakan. Dengan demikian statement pada perulangan ini akan selalu dikerjakan minimal satu kali.

Algoritma dan Struktur Data

Daftar Pustaka

• Antony Pranata, Algoritma dan Pemrograman, Graha Ilmu, Yogyakarta.
• Jogiyanto HM, Turbo Pascal, Andi Offset, Yogyakarta.
• Rinaldi Munir, Algoritma dan Pemrograman dengan Pascal dan C, Informatika, Bandung.

Komputer sebagai alat bantu untuk menyelesaikan masalah.
Dalam menyelesaian masalah dengan komputer perlu merumuskan langkah-langkah penyelesaian masalah dengan sekumpulan instruksi.
Sekumpulan instruksi yang dimengerti oleh komputer disebut dengan program.

Bahasa Pemrograman

Program harus ditulis dalam suatu bahasa yang dimengerti oleh komputer yaitu dalam Bahasa pemrograman , dibedakan menjadi :

a. Bahasa tingkat rendah (low level language) :
Bahasa yang berorientasi ke mesin.
b. Bahasa tingkat tinggi (high level language) :
bahasa yang berorientasi ke manusia (seperti bahasa inggris)

contoh : Bahasa Pascal, bahasa C dll.
Program yang ditulis dalam bahasa pemrograman akan diterjemahkan kedalam bahasa mesin dengan menggunakan penterjemah.
Penterjemah :
Interpreter : menterjemahkan baris per baris instruksi. Contoh bahasa Basic.
Compiler : menterjamahkan setelah seluruh instruksi ditulis. Contoh bahasa Pascal, C, Ada ,C++

Algoritma

Definisi Algoritma adalah urutan langkah-langkah logis penyelesaian masalah yang disusun secara sistematis.
Berasal dari nama penulis buku arab yang terkenal yaitu Abu Ja’far Muhammad Ibnu Musa Al-huwarizmi.
Al-Khuwarizmi menulis buku yang berjudul Kitab Al Jabar Wal-Muqabala yang artinya “Buku pemugaran dan pengurangan” (The book of restoration and reduction).

Notasi Algoritma

Notasi algoritma bukan merupakan notasi bahasa pemrograman. Namun notasi ini dapat diterjemahkan ke dalam berbagai bahasa pemrograman. Penotasian algoritma harus dilakukan sedemikian hingga mudah dibaca dan dimengerti. Meskipun notasi algoritma tidak berbentuk baku seperti notasi bahasa pemrograman, namun konsistensi terhadap notasi perlu diperhatikan untuk menghindari terjadinya kekeliruan.
Bentuk notasi algoritma :

• Uraian deskriptif
• Diagram-alir (flowchart)
• Pseudocode

Uraian Deskriptif

Dengan notasi bergaya uraian, deskripsi setiap langkah dijelaskan dengan bahasa yang gamblang. Proses diawali dengan kata kerja seperti ‘baca’ atau ‘membaca’, ’hitung’ atau ‘menghitung’, ‘bagi’ atau ‘membagi’, ‘ganti’ atau ‘mengganti’, dan sebagainya, sedangkan pernyataan kondisional dinyatakan dengan ‘jika ... maka ...’.
Contoh : menyelesaikan permasalahan menghitung luas dan keliling suatu lingkaran
Algoritma Hitung_Luas_dan_Keliling_Lingkaran
DESKRIPSI:

1. Masukkan jari-jari lingkaran (r)
2. Hitung luas lingkaran dengan rumus L = phi * r * r
3. Hitung keliling lingkaran dengan rumus K = 2 * phi * r
4. Tampilkan luas lingkaran
5. Tampilkan keliling lingkaran

Diagram Alir (Flowchart)

Flowchart adalah gambaran dalam bentuk diagram alir dari algoritma-algoritma dalam suatu program, yang menyatakan arah alur program tersebut.
Contoh: menghitung luas dan keliling lingkaran yang algoritmanya dinotasikan dalam bentuk diagram alir.

Pseudocode

Notasi yang menyerupai notasi bahasa pemrograman tingkat tinggi, khususnya Bahasa Pascal dan C.
Umumnya mempunyai notasi yang hampir mirip untuk beberapa instruksi dalam beberapa bahasa pemrograman, seperti notasi if-then-else, while-do, repeat-until, read, write, dan sebagainya.
Contoh menyelesaikan permasalahan menghitung luas dan keliling suatu lingkaran dengan menggunakan bentuk pseudocode :
Algoritma Hitung_Luas_dan_Keliling_Lingkaran
{ Dimasukkan nilai jari-jari lingkaran (r). Carilah dan cetak luas dan keliling lingkaran tersebut dengan menggunakan rumus L=phi*r*r dan K=2*phi*r }
DEKLARASI:
const phi = 3.14
r, L, K = real
DESKRIPSI:
read(r)
L <--  phi * r * r
K <--  2 * phi * r
write(‘Luas lingkaran = ‘,L)
write(‘Keliling lingkaran = ‘,K)

Ciri Penting Algoritma

• Algoritma harus berhenti setelah mengerjakan sejumlah langkah terbatas.
• Setiap langkah harus didefinisikan dengan tepat dan tidak berarti-dua (Ambiguitas).
• Algoritma memiliki nol atau lebih masukkan.
• Algoritma memiliki nol atau lebih keluaran.
• Algoritma harus efektif (setiap langkah harus sederhana sehingga dapat dikerjakan dalam waktu yang masuk akal).

Percabangan

Hampir tiap program mengandung analisa pemilihan dari dua atau lebih alternatif, dikenal dengan istilah Percabangan.

Analisa ini memerlukan penyeleksian kondisi, untuk menentukan tindakan apa yang harus dikerjakan selanjutnya. Hasil dari penyeleksian kondisi dapat BENAR atau SALAH.

Jika kondisi benar maka dilakukan tindakan sesusai dengan kondisi benar,

jika kondisi salah maka tidak dilakukan tindakan apapun atau melakukan tindakan yang lainnya.

Ada dua buah perintah atau statement yang biasa digunakan untuk analisa pengambilan keputusan Pascal, yaitu :

1. Statement if...then... atau if...then...else...
2. Statement case...of... atau case...of...else...

Statement IF … THEN …

Perintah ini untuk mengungkapkan percabangan bersyarat. Penyeleksian kondisi akan dilakukan terlebih dahulu pada statement if.

Bila kondisi yang diseleksi terpenuhi, maka statement yang mengikuti THEN akan diproses bila kondisi tidak terpenuhi, maka statement pada baris berikutnya yang akan diproses.

Contoh

Tentukan apakah siswa lulus atau tidak.

syarat lulus Jika nilai ujian >= 60

IF...THEN...ELSE…

IF <kondisi> THEN
Begin
Pernyatan-pernyataan yang akan diproses bila kondisi terpenuhi
end
ELSE
Begin
Pernyataan-pernyataan yang akan diproses bila kondisi tidak terpenuhi
End;

Statement IF … ELSE IF
Dalam kasus tertentu butuh pernyataan IF lain setelah ELSE
if <kondisi 1> then
pernyataan1
else if <kondisi 2> then
pernyataan2
else
pernyataan3;

Statement Case...OF...
CASE <selector> OF
<case-label 1> : <pernyataan 1>
<case-label 2> : <pernyataan 2>
<case-label 3> : <pernyataan 3>
ELSE
< case-label x> : <pernyataan 4> END;

Perintah yang mempunyai case label yang bernilai sama dengan dengan nilai selector akan diproses sedangkan perintah lainnya tidak.
Bila nilai selector diluar nilai-nilai yang ada pada case label maka struktur Case-Of tidak dijalankan atau ke perintah ELSE-nya.

Macam-macam Operator

Setelah mempelajari macam tipe data, kita akan mempelajari bermacam operator yang dilakukan terhadap variabel. Pada dasarnya ada tujuh nmacam operator :

1. Operator pemberian nilai.
2. Operator aritmatik.
3. Operator pemanipulasi bit.
4. Operator boolean.
5. Operator pembanding.
6. Operator himpunan.
7. Operator string.

Operator Pemberi Nilai

Merupakan operator yang paling sering digunakan.

Kita sudah sering melihat dan membcanya.

Contoh :

a:= 12; (untuk tipe bilangan bulat ).
b:= ‘halo’; (untuk tipe string ).
c:= 3,14; (untuk tipe real).
d:= (3, 4, 5); (untuk tipe himpunan).

Operator Aritmatik

Operator aritmatik hanya dapat dikerjakan pada bilangan bulat atau bilangan real.

Pascal mengenal dua macam operator aritmatik yaitu operator aritmatik tunggal dan operator aritmatik biner

Ada enam macam operator aritmatik biner pada pascal

Ada dua macam opertor aritmatik tunggal pada pascal.

Tabel operator aritmatik tunggal

Penggunaan aritmatik tunggal

x:= -y;

Artinya nilai x sama dengan nilai invers dari nilai y

x := +y;

yang sama artinya dengan x:= y;

Tabel operator aritmatik biner

Contoh :

X := y + z;
X := a – b – c – d ;
X := 5 + 9 + 3.14;
X:= a / b ;
X := a + b – c * d ;
X := 10 div 3;
X := 1 mod 3;

Operator Pemanipulasi Bit

Operasi ini berhubungan dengan pemanipulasian bit pada operan.

Operasi ini hanya dapat dikenakan pada operan bertipe bilangan bulat dan hasil operasinya juga selalu bilangan bulat.

Ada enan macam operator pemanipulasi bit.

Contoh :

Operator and -> x : = 1 and 0; { x = 0}

Operator or ->x := 1 or 0; { x = 1 }

Operator xor -> x := 1 xor 0; { x = 1 }

Operator shl ->x := y shl 2;

Operator shr -> a := b shr 5;

Operator Boolean

Operator ini dikenakan pada operan bertipe boolean, sehingga tipe operan dan tipe hasil operasinya adalah boolean.

Ada empat macam operator.

Contoh :

Operator and -> a := true and false; { a = false}

Operator or ->a := true or false; { a = true }

Operator xor ->a := true xor false; { a = true }

Operasi not -> a := not b; { a = true jika b = false, atau a = false jika b = true }

Operator Pembanding

Operator pembanding membandingkan dua buah operan.

Hasil dari operan ini adalah data bertipe boolean yang menunjukkan hasil pembandingan bernilai benar atau salah.

Ada delapan macam operator pembanding.

Kolom ketiga (Tipe Operan) adalah jenis operan yang dapat dikenai operator pembanding.

Contoh :

A := 5 = 6; {a = false karena 5 tidak sama dengan 6 }

A := 5 <> 6; {a = true}

A := 5 < 6; {a = true} A := (3<4) and (5>6); {a = false karena 5<6} A := (4<=4) or (5>6); {a = true}

A := (4>=4) or (5>=5); {a = true}

Operator Himpunan

Operator ini hanya digunakan pada tipe himpunan.

Ada empat macam operator himpunan.

Contoh :

A : = B + C

menggabungkan semua anggota himp. B dan C ke dalam A.

Jika A, B dan C bertipe set of char dan nilai A B masing-masing adalah [‘A’,’B’] dan [‘C’] maka variabel C akan bernilai [‘A’, ‘B’, ‘C’].

Operator String

Pascal hanya mengenal satu macam operator string, yaitu penggabungan.

Operator ini digunakan untuk menggabungkan dua atau lebih operan string menjadi sebuah string menjadi sebuah string yang lebih panjang.

Simbol untuk operator ini sama dengan operator penjumlahan (+).

Contoh :

S := ‘Turbo’ + ‘Pascal’; {sama artinya dengan S := ‘Turbo Pascal’}

Derajat Operator

Adanya operator – operator di atas menyebabkan munculnya konsep derajat operator.

Kegunaannya adalah menentukan operator mana yang harus dikerjakan lebih dulu dan operator mana yang terakhir dikerjakan.

Contoh :

x := 2 + 3 * 4;

akan menghasilkan 14 = (2+12) atau 20= (5*4)

Macam-macam Type Data

Macam – Macam Type Data

Ada enam kelompok type data pada turbo pascal yaitu :

1. Tipe data sederhana , type data sederhana dibagi menjadi dua type :

   a. Type ordinal. Tipe data ordinal masih dibagi lagi menjadi beberpa tipe, yaitu :

• Tipe bilangan bulat.
• Tipe boolean.
• Tipe karakter tipe terbilang.
• Tipe subjangkauan.

   b. Tipe real

2. Tipe string, yaitu sekumpulan karakter.

3. Tipe terstruktur, tipe trestruktur dibagi menjadi lima tipe, yaitu :

• Tipe larik.
• Tipe rekaman.
• Tipe himpunan.
• Tipe berkas.

4. Tipe pointer.

5. Tipe prosedural.

6. Tipe objek

Tipe bilangan bulat

Tipe bilangan bulat digunakan untuk menyimpan semua bilangan bulat. Macam-macam tipe bilangan bulat yang dimiliki oleh pascal.

Tipe Boolean

Tipe data ini biasa digunakan untuk mempresentasikan logika dan hanya dapat bernilai True (1) atau False (2)

Macam tipe data Boolean :

Dalam suatu ekspresi, operator seperti =, <>, >, <, >=, <= dan In akan banyak dipakai untuk menentukan hasil dari suatu tipe data boolean.

Tipe Karakter

Tipe data ini hanya dapat menampung satu karakter saja dan mengalokasikan satu byte memori. Bentuk Umum : Var :char,
Contoh :

Var
Kalimat :string;
Nama :string[25];
Alamat :string[30];

Tipe Subjangkauan
Pada dasarnya tipe jangkauan hampir sama dengan tipe bilangan bulat, bedanya kita bebas menetukan jangkauan dari tipe data ini, misal dari 1 sampai 100.
Contoh deklarasi :

type
bulan = 1..12;
var
januari : bulan;

Tipe terbilang

Adalah tipe data yang kita definisikan sendiri dengan nilai yang terbilang
Adalah tipe data baru yang elemennya disebutkan satu per satu
Bentuk Umum :
Type
=(elemen1,elemen2,…,elemenN);
Contoh :

type
Hari=(Senin,Selasa,Rabu,Kamis,Jumat,Sabtu);
Var HariKerja :Hari;
Begin
…
for HariKerja := Senin to Sabtu do
{mengerjakan Statement perulangan}
End.

Real/Floating-Point

Tipe data ini biasa digunakan untuk mempresentasikan nilai pecahan.

Jenis tipe data real :

 

Tipe String

Merupakan tipe data gabungan (array) dari karakter sebanyak 256 (default).
Mendefinisikan untaian kata atau karakter
Bentuk Umum:
Var
:string,
Contoh :

Var
Kalimat :string;
Nama :string[25];
Alamat :string[30];

atau
kalimat := ‘Turbo Pascal’;

Tipe Larik

Tipe larik memungkinkan kita mendeklarasikan kumpulan variabel yang bertipe sama.
Pendeklarasian larik harus mengikuti bentuk umum ;
var
nama_larik : array[batas_bawah..batas_akhir] of tipe larik;
Contoh :
Var
a1,a2,a3,a4,a5,a6,a7,a8 : longint;
Dengan larik kita bisa mendefinisikan kedelapan variabel menjadi :
var
a : array[1..8] of longint;

Tipe Rekaman

Bila dengan larik kita menggabungkan beberapa variabel bertype sama, dengan rekaman kita menggabungkan beberapa variabel yang typenya tidak sama.
Untuk mendeklarasikan rekaman digunakan kata baku “ Record “,

contoh :

type
Tkaryawan = record;
nama := string;
alamat := string;
gaji := Longint;
end;

Tipe Himpunan
Tipe himpunan digunakan untuk menyimpan kumpulan nilai ( disebut juga anggota himpunan ) yang bertipe sama.
Contoh :

type
himpunankarakter : set of Char;
untuk mendeklarasikan tipe himpunankarakter sebagai himpunan dari karakter

Contoh :

var
vokal : Himpunankarakter; (‘a’,’I’,’u’,’e’,’o’)
huruf ; Himpunankarakter; (‘a’,…’z’)

Perbedaan Algoritma dengan Program

Algoritma adalah jantung ilmu informatika atau komputer. Banyak cabang ilmu yang diacu dalam terminologi algoritma, namun bukan berarti algoritma selalu identik dengan komputer.

Dalam algoritma ada bagian yang mengerjakan langkah-langkah yang disebut dengan istilah pemroses(Prosessor) dapat berupa alat, manusia, robot komputer dll

Perbedaan algoritma dengan Program

Komputer hanyalah alat pemroses.

Agar dapat dilaksanakan oleh komputer algoritma harus dinaytakan dalam bentuk yang disebut dengan program.jadi program adalah perwujudan atau implementasi dari algoritma yang ditulis dalam bahasa pemrograman tertentu dan dapat dilaksanakan oleh komputer. Pembuat program adalah programmer.

Kegiatan membuat program disebut programming. Tiap langkah dalam program disebut pernyataan atau instruksi.

Secara garis besar komputer tersusun atas piranti masukan, pemroses dan piranti keluaran.

Belajar Memprogram & Belajar Bahasa Pemrograman.

Belajar memprogram adalah belajar tentang strategi pemecahan masalah dan dan sistematika pemecahan masalah tersebut.

Belajar bahasa pemrograman belajar memakai suatu bahasa, aturan tata bahasanya, instruksi-instruksinya, cara pengoperasian compiler-nya dan memanfaatkan instruksi-instruksi tersebut untuk membuat program.

Bahasa pemrograman dapat digolongkan mencjadi :

1. Bahasa Pemrograman bertujuan khusus.
2. Bahasa pemrograman bertujuan umum.

Berdasarkan pada apakah bahasa tersebut lebih dekat ke mesin atau kemanusia maka bahasa dikelompokan menjadi :

1. Bahasa tingkat rendah.
2. Bahasa tingkat tinggi.

Struktur Dasar Algoritma

Ada tiga struktur dasar untuk membangun algoritma , yaitu :

1. Runtunan (sequence)
2. Pemilihan (selection)
3. Pengulangan (repetition)

Runtunan

Aksi – aksi dalam algoritma menghitung selisih dua buah jam akan dilaksanakan oleh pemroses sesuai dengan urutan penulisannya.

Aksi – aksi yg berurutan ini dinamakan runtunan.

Tiap aksi di dalam runtunan dilaksanakan setelah aksi sebelumnya selesai dilaksanakan.

Runtunan aksi dilambangkan dengan A1, A2, A3, A4 dan A5 :

A1

A2

A3

A4

A5

Pemilihan

Pada kasus selisih dua jam, harus diperiksa dulu apakah ia lebih kecil dari jam awal percakapan. Jika ya, maka tambahkan nilai 24 ke j2. Karena itu, langkah A2 diperhalus menjadi :

A2.1 baca jam selesai bicara, misalkan j2:m2:d2

A2.2 if j2 < j1 then

        tambahkan j2 dengan 24

Jika j2 lebih besar dari j1, maka j2 tetap semula, pernyataan diatas dapat ditulis dalam bentuk umum:

      

  if kondisi then

        aksi

If --> jika, then --> maka

Kondisi adalah pernyataan yang dapat ditentukan nilai kebenarannya (benar atau salah)

Aksi hanya dilaksanakan apabila kondisi setelah kata if bernilai benar. Sebaliknya apabila kondisi bernilai salah, aksi sesudah kata then tidak dilaksanakan.

Pada langkah A2.2 hanya memberikan satu pilihan aksi bila kondisi dipenuhi bernilai benar dan tidak melakukan kasi apa2 jika konsidi bernilai salah.

Bentuk pemilihan yg lebih umum ialah memilih satu dari dua buah aksi bergantung pada nilai kondisinya :

if kondisi then

aksi 1

else

aksi 2

Else artinya “kalau tidak”. Bila kondisi bernilai benar, aksi 1 akan dikerjakan, tetapi kalau tidak, aksi 2 yang akan dikerjakan. Misal :

if jalanan macet then

lewatlah di jalan tol

else

lewatlah di jalur biasa

Pengulangan

Pada kasus pengulangan penulisan, bila dimasukkan ke dalam komputer, maka untuk mengatasinya digunakan kata kunci repeat (ulangi) dan times (kali).

Contoh :

Algoritma menulis 500 kalimat

A2. Repeat 500 times

tulis “saya berjanji tidak akan nakal dan malas lagi”

Struktur pengulangan dapat ditulis secara umum :

repeat N times

aksi

Struktur pengulangan disebut kalang (loop).

Bagian algoritma yang diulang disebut badan kalang (loop body).

Aksi di dalam badan kalang akan dilaksanakan sebanyak N kali

Contoh : algoritma mencari alamat mahasiswa bila diketahui NIM dari sebuah tabel yang berisi data NIM, nama dan alamat seluruh mahasiswa.

Algoritma pencarian di dalam tabel

A1. baca NIM pertama di dalam tabel

A2. 

repeat

 if NIM yang dibaca sama dengan NIM yang dicari maka tulis alamat mahasiswa yang bersangkutan

else

baca NIM berikutnya di dalam tabel

end if

until NIM ditemukan atau seluruh isi tabel sudah diperiksa

Bahasa Pascal

Standart pascal adalah bahasa pascal yang didefinisikan oleh K.Jensen dan Niklaus Wirth.
Standart di Amerika didefinisikan oleh kerjasama antara ANSI (American National Standards Institute -) dengan IEEE ( Intsitute Electrical and Engireers ).

Struktur Program Pascal

1. Judul.
2. Blok Program.
    a. Bagian Deklarasi.

• - Deklarasi Label.
• - Deklarasi Konstanta.
• - Deklarasi Tipe.
• - Deklarasi Variabel.
• - Deklarasi Prosedure.
• - Deklarasi Fungsi.

    b. Bagian Pernyataan.

Program Pascal yg Paling Sederhana

Merupakan program yang hanya terdiri dari sebuah bagian pernyataan saja. Bagian pernyataan ( Statement Part ) merupakan bagian terakhir dari suatu blok. Bagian ini diawali dengan kata cadangan ( Reserved Word ) begin dan diakhiri dengan kata cadangan End.

Begin
end.
Bentuk Umum =


Begin
Statement
-
-
End.

Program Pascal paling sederhana

contoh :
begin
writeln('Blog Gowel');
end.
Outputnya : Blog Gowel
Statement writeln digunakan untuk menampilkan hasil perbaris
Begin
writeln("Blog Gowel');
weriteln('=========');
end.
Outputnya :
Blog Gowel
=========
Yang perlu diperhatikan adalah setiap statement perbaris diakhiri dengan tanda ( ; )

Mencetak Hasil Ke Printer

Contoh :
Begin
Writeln (Lst, “ Saya Pascal ‘) ;
Writeln (Lst ‘-------------------’);
End.
Out Put :
Saya Pascal
------------------

Penulisan Program Pascal.

Program pascal tidak mengenal aturan penulisan di kolom tertentu, jadi boleh di kolom manapun.


Begin
Writeln (Lst, “ Saya Pascal ‘) ;
Writeln (Lst ‘-------------------’);
End.
Atau


Begin
Writeln (Lst, “ Saya Pascal ‘) ; Writeln (Lst ‘-------------------’); End.

Judul Program

Di Turbo Pascal judul program sifatnya optional dan tidak signifikan didalam program.
Contoh :
Begin
Writeln (Lst, “ Saya Pascal ‘) ;
Writeln (Lst ‘-------------------’);
End.
Contoh Penulisan judul Program yang Benar
Program gaji(Input,Output);
Program Laporan(layar,cakram,printer,Plotter);

Bagian Deklarasi

Bagian deklarasi digunakan bila didalam program anda menggunakan pengenal (identifier). Identifier dapat berupa label, konstanta, tipe, variabel, prosedur dan fungsi. Kalau suatu program menggunakan identifier pascal menuntut supaya identifier tersebut dikenalkan terlebih dahulu sebelum digunakan, yaitu dideklarasikan terlebih dahulu pada bagian ini.

Bagian Deklarasi Konstanta

Bila ingin menggunakan indentifier yang berisi nilai-nilai konstatnta maka harus didefinisikan terlebih dahulu pada bagian ini. Definisi konstanta diawali dengan kata cadangan Const diikuti oleh kumpulan identifier yang diberi suatu nilai konstanta.
Program Contoh_Konstanta(layar);
Const
Potongan := 0.2;
gaji := 25000;
Perusahaan := ‘PT OJO LALI’
begin
Writeln(‘Potongan=‘,potongan);
Writeln(‘Gaji =‘,gaji);
Writeln(‘Perusahaan=‘,Perusahaan);
End.
Output :
Potongan = 2.0000000000E-o1
Gaji = 25000
Perusahaan = PT OJO LALI

---

Program Contoh_Konstanta_Terdefinisi(Layar);
Begin
Writeln(‘Nilai Logika benar =‘,True);
Writeln(‘Nilai Logika salah =‘,False);
Writeln(‘Nilai Maxint=‘,Maxint);
Writeln(‘Nilai Maxlongint=‘,Maxlongint);
end.
OutPut :
Nilai Logika Benar = True
Nilai Logika Salah = False
Nilai Maxint = 32767.
Nilai MaxLongint = 2147483647

Deklarasi Variabel

Jika konstanta merupakan identifier berisi data konstanta yang nilainya sudah ditentukan dengan pasti, tidak dapat dirubah didalam program, maka variabel adalah identifier yang berisi data yang dapat berubah-ubah nilainya didalam program
Contoh :
Var
Total,gaji,tunjangan : Real;
Menikah : Boolean;
jumlah_anak : Integer;
Keterangan : String[25];

Deklarasi Tipe

Data tipe sederhana (simple-type-data).
Terdiri dari :
a. Type data standar (Standard data type)
- Integer - Char -boolean
- real - String.
b. Type data didefinisikan pemakai
(User defined data type ).
- Euimerated / scalar type.
- Subrange type.
Data tipe terstruktur (structured-type-data),terdiri dari :
- Array -Record - file - Set
Data tipe penunjuk (pointer-type-data)

Deklarasi label.

Bila program menggunakan statement go to, untuk meloncat ke suatu statement yang tertentu, maka dibutuhkan suatu label pada statement yang dituju dan label tersebut harus dideklarasikan terlebih dahulu pada bagian deklarasi.
Mendeklarasikan label diawali dengan kata cadangan label diikuti dengan kumpulan identifier label dengan dipisahkan oleh koma dan diakhiri dengan titik koma.


Program contoh_label(layar);
Label
100,selesai;
Begin <-----------------------------------identifier label.
Writeln(‘Bahasa’);
go to 100;
Writeln(‘Basic’);
Writeln(‘Cobol’);
100 <-------------------------------------label yang dituju.
Writeln(‘Pascal’);
go to selesai;
Writeln(‘Forttran’);
Selesai <-------------------------------Label yang dituju
End.

Deklarasi Prosedur

Prosedur merupakan bagian yang terpisahkan dari program dan dapat diaktifkan dimanapun didalam program. Prosedur dapat berupa prosedur standar (sudah didefinisikan oleh program Pascal) maupun prosedur yang akan dibuat sendiri oleh pemakai.
Contoh :
Program contoh_prosedur(layar);
Procedure tambah(x,y:integer; var hasil:integer);
Begin
hasil :=x +y;
end

Deklarasi Fungsi

Fungsi juga merupakan bagian program yang terpisah mirip dengan prosedur, tapi ada beberapa perbedaannya. Fungsi dapat berupa fungsi standar ( sudah ada didalam Pascal) atau fungsi yang akan dibuat sendiri oleh pemakai.
Contoh Deklarasi Fungsi :
Program contoh_fungsi(layar);
Function tambah(x,y:integer):integer;
Begin
tambah :=x + y ;
End;
{program utama}
Begin
Writeln(‘2 + 3 = ‘,tambah(2,3));
End.
Out Put : 
2 + 3 = 5.

Definisi Algoritma

Dosen : Teguh Cahyono, ST.M.Kom

Kata algoritma sendiri berasal dari kata algorism yang berarti proses sebagai metode perhitungan komputasi ( Urutan logis pengambilan keputusan intuk penyelesaian masalah ).
Penemu : Abu Abdullah Muhammad Ibnu Musa Al-Khuwarizm.

Pada tahun 1950, algoritma sering dihubungkan dengan “ algoritma Eucledean “ yaitu proses untuk menentukan pembagi bersama terbesar dari dua bilangan bulat. Yaitu ;

Diberikan dua buah bilangan bulat positif m dan n ( dalam hal ini m >=n), carilah pembagi bersama terbesar,pbt, dari kedua bilangan tersebut, yaitu bilangan bulat positif terbesar yang habis membagi m dan n.
E1 bagilah m dengan n dan misalkan hasil baginya adalah r.
E2 apakah r = 0 ? Jika r=0, algoritma selesai, n adalah jawabannya , tetapi jika tidak maka dilanjutkan ke langkah E3.
E3 ganti nilai m dengan nilai n, nilai n dengan nilai r, dan ulang kembali kelangkah E1.
Menurut Donald E. Knuth dalam bukunya yang berjudul the art of computer programmming, algoritma harus mempunyai lima ciri :

• Algoritma harus berhenti setelah mengerjakan sejumlah langkah terbatas.
• Setiap langkah harus didefinisikan dengan tepat dan tidak berarti-dua.
• Algoritma memiliki 0 atau lebih masukan (input). Masukan ialah besaran yang diberikan kepada algoritma sebelum algoritma mulai bekerja.
• Algoritma mempunyai satu atau lebih keluaran (output). Keluaran ialah besaran yang memiliki hubungan dengan masukan
• Algoritma harus sangkil ( efective ).Setiap langkah harus sederhana sehingga dapat dikerrjakan dengan sejumlah waktu yang masuk akal.

Proses, Langkah dan Aksi

1. Algoritma disusun oleh sederetan langkah yg logis.
2. Tiap langkah tsb mengerjakan suatu tindakan/aksi.
3. to : keadaan sebelum aksi dikerjakan aksi, t1 : keadaan setelah aksi dikerjakan

Algoritma Euclidean dpt dipandang sebagai sebuah proses mencari pembagi bersama terbesar dari dua buah bilangan bulat positif, m dan n.

• to : m dan n sudah terdefinisi nilainya, m>0, n>0 dan m>n
• E.1.Bagilah m dengan n dan misalkan r adalah sisanya
• t1 : r adalah sisa hasil bagi, 0≤ r < n
• t0 : r adalah sisa hasil bagi, 0≤ r < n
• E.2. Apakah r = 0? Jika r = 0, algoritma selesai; n adalah jawabannya, tapi jika tidak, lanjutkan ke langkah E3.
• t1 : r = 0 (n adalah jawabannya) atau r ≠ 0
• t0 : r ≠ 0
• E.3. Ganti nilai m dengan nilai n, nilai n dengan nilai r dan ulang kembali ke langkah E1.
• t1 : m = n dan n = r

Analisis yang tidak tajam terhadap permasalahan dapat menghasilkan algoritma yang tidak benar untuk beberapa kasus.
Contoh : Menghitung lama percakapan di wartel.
Algoritma menghitung selisih dua buah jam

• A1. baca jam mulai percakapan, misalkan j1:m1:d1
• A2. baca jam selesai percakapan, misalkan j2:m2:d2
• A3. hitung selisih (j2:m2:d2) dengan (j1:m1:d1)
• A4. tulis selisih langkah A3.

Apabila penelepon mulai percakapan pukul 21:40:12 dan selesai pukul 22:58:48, maka lama percakapan adalah (22:58:48)-(21:40:12) = (1:18:36)
kasus lain: mulai percakapan = (21:50:58)
selesai percakapan = (23:18:10)
Selisihnya bukan (23:18:10) - (21:50:58) = (2:32:-48)
Maka harus dikonversi semua jam ke detik
23:18:10 = 83890 detik
21:50:58 = 78658 detik -
Selisih = 5232 detik = (1:27:22)
Dengan demikian, algoritma menghitung selisih dua buah jam diperhalus menjadi :
Algoritma menghitung selisih dua buah jam

• A1. baca jam mulai percakapan, misalakan j1:m1:d1
• A2. baca jam selesai percakapan, misalkan j2:m2:d2
• A3.1 konversi j1:m1:d1 ke dalam jumlah detik
• A3.2 konversi j2:m2:d2 ke dalam jumlah detik
• A3.3 kurangi hasil langkah A3.2 dengan hasil langkah A3.1
• A3.4 konversi hasil langkah A3.3 ke dalam jam:menit:detik
• A4. tulis hasil langkah A3.4

Langkah A3 telah diperhalus menjadi beberapa up – aksi (subaction) A3.1, A3.2, A3.3 dan A3.4.
Pendekatan desain algoritma seperti ini dinamakan penghalusan langkah atau perancangan puncak-turun (top-down design).
Pendekatan ini sangat bermanfaat dalam membuat algoritma untuk masalah yg cukup rumit atau kompleks.
Penghalusan langkah terus berlanjut sampai tiap langkah sudah cukup rinci dan tepat untuk dilaksanakan pemroses.

Dengan memperjelas langkah A3.1, A3.2, A3.3 dan memperhalus lagi langkah A3.4, maka :
Algoritma menghitung selisih dua jam

• A1. baca jam mulai percakapan, misalkan j1:m1:d1
• A2. baca jam selesai percakapan, misalkan j2:m2:d2
• A3.1 hitung p = j1 x 3600 + m1 x 60 + d1
• A3.2 hitung q = j2 x 3600 + m2 x 60 + d2
• A3.3 hitung r = q – p {selisih jumlah detik kedua jam}
• A3.4.1 hitung s = r/3600, misalkan sisanya adalah t {s adalah selisih dalam jam}
• A3.4.2 hitung u = t/60, misalkan sisanya adalah v {u adalah selisih dalam menit, v adalah selisih dalam detik}
• A4. tulis s:u:v {selisih kedua jam dalam jam:menit:detik}