Delphi : Penggunaan MOD dan DIV

Nama        : ANDI KHOIRUDIN
Kelas         : I-B SMT 1
Jurusan     : Teknik Informatika
STIMIK YADIKA BANGIL 2014

 

Assamualaikum Wr. Wb.

           Pada kesempatan ini saya akan membahas penggunaan Mod dan Div di Deplhi. Sebenarnya penggunaan Mod dan Div pernah saya bahas pada postingan pertama yaitu program konversi dari detik menjadi berapa hari berapa jam berapa menit berapa detik tapi biar lebih paham saya akan bahas sekali lagi. Mungkin program konversi terlalu rumit bagi pemula termasuk saya maka pada kali ini kita akan membahas dasar dari Mod dan Div.

MOD adalah singkatan dari MODULUS yg artinya : Operator aritmatika pada Delphi untuk melakukan operasi aritmatika menentukan sisa hasil bagi.

sedangkan DIV adalah singkatan dari DIVIDE yang berarti bagi. Lebih jelasnya div adalah operator aritmatika pada Delphi untuk melakukan operasi aritmatika yaitu operasi pembagian pada bilangan bulat. Sedangkan pada bilangan pecahan menggunakan operator ( / ).

untuk lebih jelasnya, silahkan lihat contoh berikut :

5 div 2 = 2 (5 dibagi 2 adalah 2. sisa 1)
5 mod 2 = 1 (sisa dari hasil pembagian)

intinya MOD menampilkan sisa pembagian dan DIV menampilkan hasil pendekatan pembagian 

Kalau udah ngerti langsung aja ke penggunannya, check this out…

Contoh Penggunaan Mod dan Div

Screenshotnya :

Script programnya 

program mod_div;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
a,b,c,d:integer;

begin
writeln ('Nama      : Andi Khoirudin');
writeln ('Kelas/NIM : 1B/114224042');
writeln;
writeln ('>>> Menentukan MOV dan DIV <<<');
writeln;
write('A = '); Readln(a);
write('B = '); Readln(b);
c:=A MOD B;
d:=A DIV B;
writeln('A MOD B = ',c);
writeln('A DIV B = ',d);
  writeln;
  writeln;
  writeln;
  writeln('>>>----->  Visit : http://indonetizensia.blogspot.com/  <-----<<<');
readln;
end.

Silahkan dikembangkan sendiri programnya. Semoga bermanfaat & Selamat Mencoba
Kurang lebihnya mohon maaf dan terima kasih sudah berkunjung 

Wassalamualaikum Wr. Wb