Percabangan Pada Delphi

Percabangan dalam Delphi merupakan suatu sintaks dalam bahasa Pascal yang mensyaratkan suatu kondisi tertentu supaya statement atau kode program tersebut dapat dijalankan. Terdapat 2 jenis percabangan yang harus kita ketahui. 

B. IF THEN ELSE

merupakan perintah yang akan dijalankan pada then jika kondisi pada If terpenuhi, sedangkan pada
pada Else akan dilakukan jika kondisi tidak terpenuhi. Biasanya perintah ini untuk kondisi ganda.

    Format :     If (Kondisi) then
                       (Perintah)
                       Else
                       (Perintah)

B. IF THEN ELSE BERSARANG

Apabila ada perintah if dalam perintah If yang lain. Kondisi ini dibutuhkan  pada saat kriteria yang akan dimasukkan lebih dari satu.

    Format :        if (Kondisi 1) then
                         if (Kondisi 2) then
                              (Proses 1)
                                  else
                              (Proses 2);

Contoh Program IF THEN ELSE

1. Buka aplikasi delphi

2. Pilih File - New - Console Application

3. Setelah muncul jendela project, ketikkan script seperti berikut :

  4. Jalankan program dengan klik RUN/F9 ,dan masukkan data, lalu enter, maka tampilan seperti berikut :

Contoh Program IF THEN ELSE BERSARANG

1. Buka aplikasi delphi

2. Pilih File - New - Console Application

3. Setelah muncul jendela project, ketikkan script seperti berikut :

  4. Jalankan program dengan klik RUN/F9 ,dan masukkan data, lalu enter, maka tampilan seperti berikut :

Array Pada Delphi

Array adalah sekumpulan variabel yang memiliki tipe data yang sama dan dinyatakan dengan nama yang sama. Array merupakan konsep yang penting dalam pemrograman, karna array memungkinkan untuk menyimpan data maupun referensi objek dalam jumlah banyak dan terindeks. Array menggunakan indeks integer untuk menentukan urutan elemen-elemennya, dimana elemen pertamanya dimulai dari indeks 0,elemen kedua memiliki indeks 1, dan seterusnya.

·         Contoh :

-          Angka untuk menyimpan sederetan bilangan

-          Buku untuk menyimpan sekumpulan data buku

-          Mahasiswa untuk menyimpan beberapa data mahasiswa

Contoh Program ARRAY menghitung Rata-Rata 

Ketikkan Script :

Hasil terlihat pada gambar  

Program Perulangan Pada Delphi (For to do, Repeat-Until,While do)

Perulangan adalah cara mengulang perintah-perintah sampai pada kondisi tertentu. Ada beberapa perulangan dalam pemrograman Delphi Antara lain :
1. For To Do

Bentuk Umum : 

For (counter):= (nilai awal) To (nilai akhir) Do
Begin
Perintah;
Perintah;
End; 

Contoh Perulangan For to do 

Setelah muncul jendela project console application, ketikkan script seperti berikut :

 Jalankan program dengan cara klik icon Run/F9 pada keyboard :
Hasil :

2. Perulangan Repeat-Until 

Repeat..Until disini program akan mengulang terlebih dahulu perintah-perintahnya. Sedangkan pengecekannya atau program counternya diakhir di akhir.

Setelah muncul jendela project, ketikkan script seperti berikut :

 Jalankan program dengan cara klik icon Run/F9 pada keyboard :
Hasil :

3. Perulangan While do 

While…Do disini batas akhir perulangannya dikondisikan di awal. Setelah itu program akan mengulang perintah-perintah sampai batas yang telah ditentukan diawal tersebut. Pada perulangan ini menggunakan program counter (mis. i :=i + 1).

Setelah muncul jendela project console application, ketikkan script seperti berikut :

  Jalankan program dengan cara klik icon Run/F9 pada keyboard :

Hasil :

Program Menghitung Luas segitiga dan Volume Balok (Delphi)

Segitiga adalah sebuah bentuk yang dibentuk oleh tiga sisi yang berupa garis lurus dan tiga buah sudut. 
Luas segitiga adalah setengah hasil kali panjang alas dan tingginya

Keterangan :

a = alas

b = tinggi

Program awal Menghitung Luas Segitiga :

1. Buka aplikasi delphi
2. Pilih File - New - Console Application
3. Setelah muncul jendela project, ketikkan script seperti berikut :

 4. Jalankan program dengan klik RUN/F9 , lalu tampilan seperti berikut :

5. Masukkan alas dan tinggi segitiga, lalu enter , maka tampilan seperti berikut :

Balok adalah suatu bangun ruang yang dibatasi oleh 6 persegi panjang , di mana setiap sisi persegipanjang berimpit dengan tepat satu sisi persegipanjang yang lain dan persegipanjang yang sehadap adalah kongruen.

Rumus Volume Balok = p x l x t (sebenarnya sama dengan kubus, hanya saja kubus memiliki semua rusuk yang sama panjang).

Ket: 

P = panjang

L = lebar

T = tinggi

Program awal Menghitung Volume Balok:
1. Buka aplikasi delphi
2. Pilih File - New - Console Application

3. Setelah muncul jendela project, ketikkan script seperti berikut :

 4. Jalankan program dengan klik RUN/F9 , masukakan data p.l.t lalu tampilan seperti berikut :