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