Pemrograman Struktur Data Lat5

Latihan 5 : Project Hasil Deret Suku ke-n

Part 1

• Buat Form Berikut :

• Script Proses :

• Scrip Proses dan Exit sama seperti project Part 2

• Jalankan Program (Running) Masukkan Data :

 Part 2

•  Script Proses

• Script Clear :
  

• Script Exit :

•  Jalankan Program (Running) Masukkan Data :

Pemrograman Struktur Data Lat4

Latihan 4 : Project Quicksort With Recurtion

Rekursi atau recursion adalah proses dari suatu subprogram (dapt berupa fungsi atau prosedur) yang memanggil dirinya sendiri. Proses rekursi untuk beberapa kasus merupakan algoritma yang baik dan dapat membuat pemecahan masalah lebih mudah. Akan tetapi sebagai imbalannya, proses rekursi ini harus dibayar mahal dengan memori yang banyak digunakan, dikarenakan setiap kali subprogram dipanggil, maka diperlukan sejumlah tambahan memori.

 

Project mengurutkan angka secara ascending yaitu mengurutkan angka dari kecil ke besar secara cepat, kita hanya diminta untuk memasukkan berapa angka yang akan di urutkan,setelah tekan enter data terurut sendiri.

• Ketikkan Script berikut :

• Jalankan Program (Running) Masukkan Data :

• 
  

Pemrograman Struktur Data Lat3

Latihan 3 : Project Menghitung Gaji dan Tunjangan Karyawan

• Buat Form seperti gambar :

• Structure Form :

•  Script Tombol Proses

 

• Jalankan Program (Running) Masukkan Data :
  

Pemrograman Struktur Data Lat2

Latihan 2 : Project Menginput Data Peserta

• Pertama buat Form seperti gambar :

•  Structure Form

• Script Tombol Input :
  
• Script Tombol Clear :

• Script Tombol Close :

• Jalankan Program (Running) Masukkan Data :

Pemrograman Struktur Data Lat1

Latihan 1 : Project Menghitung Luas Persegi Panjang. (Tugas UAS)

• Pertama buat Form seperti gambar :

 

 

• Structure Form :

 

•  Script Tombol Proses :

•  Script Tombol Quit :

• Jalankan Program (Running)  masukkan data :

 

Percabangan Pada Delphi (If Then Else)

Percabangan Pada Delphi (If Then Else, If Then Else Bersarang)
Perintah percabangan IF adalah suatu perintah yang berfungsi untuk mengambil keputusan dari beberapa kondisi.

Percabangan merupakan salah struktur kendali yang memungkinkan pemilihan atas perintah yang akan dijalankan. Dalam Delphi terdapat beberapa percabangan yaitu :

A. IF THEN ELSE

merupakan perintah yang akan dijalankan pada then jika kondisi pada If terpenuhi, sedangkan 

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 :

Program Array Pada Delphi

Array merupakan kumpulan data yang bertipe sama. Elemen array dapat diakses dengan menggunakan indeks yang berada pada kurung kotak([ ]). Delphi menyediakan beberapa tipe array, yaitu static array, dynamic array serta open array. Bentuk umum dari definisi array sebagai berikut :

<NamaArray>=array[tipe Indeks]of<Tipe Dasar>

<NamaArray>=array[tipe Indeks,......] of <Tipe Dasar>

<NamaArray>=array of<Tipe Dasar>

Larik (Array) adalah sebuah  tipe data referance yang dapat menampung sejumlah komponen yang mempunyai tipe yang sama(primitif atau referensi). Suatu larik mempunyai jumlah komponen yang banyaknya tetap. Komponen tersebut ditunjuk oleh suatu indek.

• Array Menghitung Rata-Rata :

Langkah Pertama

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

 4. Jalankan program dengan cara pilih icon Run/F9 pada keyboard , masukkan data, maka tampilan seperti berikut ;

• Array Membuat Matrik 

Langkah Pertama

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

4. Jalankan program dengan cara pilih icon Run/F9 pada keyboard , masukkan data, maka tampilan seperti berikut ;