member of idekreasi.net by Arif Ragil Pamungkas

Quick Sort


Quicksort adalah salah satu algoritma untuk mengurutkan sejumlah deret baris bilangan


Quicksort bukanlah algoritma yang tercepat dan terbaik dalam pengurutan, tapi setidaknya jauh lebih baik dari beberapa algortima lain seperti bubblesort,insertion sort,dll.
Algoritma ini sangat berguna ketika kita ingin mengurutkan data yang lumayan besar. Dalam dunia olimpiade komputer, quicksort adalah salah satu algoritma yang penting dan sering digunakan ketika sedang coding(membuat program) yang membutuhkan pengurutan data-data yang besar di dalamnya.







Cara mengitung hasil gaji dan tunjangan yang berbeda



Gambar disamping adalah program sederhana menghitung gaji dan tunjangan yang berbeda !!


Procedure

Prosedur adalah suatu program terpisah dan berdiri dalam suatu blok program dan befungsi sebagai sebuah sub program (program bagian). Penulisan prosedur diawali dengan kata Procedure pada bagian deklarasi program dan cukup menuliskan nama prosedur yang dibuat pada bagian Implementasi.
Alasan penggunaan prosedur :
1. Digunakan untuk penggalan program yang akan digunakan secara berulang – ulang dalam suatu proses program.

2. Digunakan untuk memecah – mecah program menjadi sebuah modul program, sehingga listing program menjadi lebih sederhana.

Procedure By Valve

Buka delphi -> Console Application / Code Editor dan masukkan script berikut





















Kode Jelasnya seperti ini:

program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
x,y : integer;
Procedure tambah(a,b:integer);
var
c:integer;
begin
c:=a+b;
writeln('Hasil Penjumlahan = ',c:10);
end;
begin
write('Masukkan Nilai X = ');readln(x);
write('Masukkan Nilai Y = ');readln(y);
tambah(x,y);
readln;
  { TODO -oUser -cConsole Main : Insert code here }

end.

Jika berhasil maka hasilnya akan seperti ini :


Faktorial Kombinasi

Istilah kombinasi dalam matematika kombinatorik berarti himpunan objek yang tidak mementingkan urutan. Kombinasi berbeda dengan permutasi yang mementingkan urutan objek.
Pertama buka delphi!


Pada tampilannya buatlah Console Aplication / Code Editor seperti di bawah ini :














program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

Procedure faktorial(var fak,hasil:integer);
var
i:integer;
begin
hasil:=1;
for i := 2 to fak do
hasil := hasil*i;
end;
var
c:real; N,R, NminR : integer;
F1,F2,F3 : integer;
begin
write('Banyaknya data yang dikombinasikan = '); readln(N);
write('Banayaknya kombinasi = '); readln(R);
faktorial(N,F1);
NminR:=N-R;
faktorial(NminR,F2);
faktorial(R,F3);
c:=F1/(F2*F3);
writeln('Jumlah kombinasi yang terjadi',c:10:2);
readln;

  { TODO -oUser -cConsole Main : Insert code here }
end

PENGERTIAN REKURSI DAN CONTOHNYA C++


Rekursi adalah suatu proses yang memanggil dirinya sendiri yang biasanya dilakukan oleh fungsi atau prosedur pada pemrograman prosedural, seperti contohnya bahasa pemrograman C, atau metode pada pemrograman berorientasi objek seperti C++ atau Java. Rekursi akan terus berjalan sampai kondisi berhenti terpenuhi, oleh karena itu dalam sebuah rekursi perlu adanya blok-blok kode sebagai berikut :

Membuat Program Faktorial Di Delphi

Flag Counter

Popular Posts

Recent Posts

Pemrograman

Pages