Selasa, 13 Mei 2014

PENGERTIAN BILANGAN DESIMAL/BINER DAN KONVERSI MELALUI DELPHI





1. Bilangan Desimal

Bilangan desimal adalah bilangan yang menggunakan 10 angka yaitu angka 0 sampai 9 dan angka berikutnya adalah 10, 11, 12 dan seterusnya. bilangan desimal sering juga disebut sebagai bilangan yang berbasis 10. berikut contoh penulisan bilangan desimal.
Contoh penulisan bilangan desimal : 1710. bilangan desimal berbasis 10, maka angka 10-lah yang menjadi subscript pada penulisan bilangan desimal.


2. Bilangan Biner

Bilangan biner adalah bilangan yang hanya menggunakan 2 angka yaitu 0 dan 1. Bilangan biner juga sering disebut sebagai bilangan yang berbasis 2. dan setiap bilangan pada biangan biner disebut bit yang dimana 1 byte = 8 bit
contoh penulisan bilangan biner yaitu 110010012.

Implementasi ke Dalam Delphi
Ketentuan dalam program :

  • Pertama Anda harus membuat sebuah function
  • Bilangan yang dioperasikan merupakan bilangan bulat (bukan yang mengandung koma)
  • Untuk operasi pembagian pada program ini menggunakna fungsi “div” dimana hasil akan dibulatkan
  • Untuk nilai yang mengandung min (“-“) akan dikonversi ke biner hanya bilangan bulatnya saja, tanda min (“-“) tidak akan difungsikan.
 
 
Berikut contoh konversi bilangan desimal ke biner :

    function desKeBiner2(angkaDesimal2:string):string;

script :
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
function TForm1.desKeBiner2(angkaDesimal2: string): string;
var
  bilBiner:array[1..99] of word;
  i,j,angka:word;
  hasil:string;
begin
  hasil:='';
  angka:=strtoint(angkaDesimal2);
  j:=0;
  While angka>=2 do begin         //untuk dec to oct 2 diganti 8
    j:=j+1;
    bilBiner[j]:=angka mod 2;        //untuk dec to oct 2 diganti 8
    angka:=angka div 2;   //untuk dec to oct 2 diganti 8
  end;
  j:=j+1;
  bilBiner[j]:=angka;
  for i:=j downto 1 do
  hasil:=hasil+inttostr(bilBiner[i]);
  desKeBiner2:=hasil;
end;
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
Untuk lebih jelasnya silahkan anda download program melalui link berikut :DOWNLOAD DISINI
Masih bingung silahkan di komentar, mudah-mudahan bisa membantu.
 

0 komentar:

Posting Komentar