Cahaya Pengetahuan

Assalamu’alaikum Wr Wb

Alhamdulillah, selamat datang di blog saya. Pada kesempatan kali ini saya akan menjelaskan tentang fungsi mod dan div pada pascal. Operator Mod dipakai untuk mendapatkan sisa hasil pembagian, sedangkan DIV untuk memperoleh hasil bulat pembagian.

Biar lebih paham, liatlah contoh berikut:

PROGRAM MOD_DAN_DIV;
USES wincrt;
VAR a,b,hasil,sisa : integer;
           bagi : real;    
 BEGIN
Writeln ('PROGRAM PEMBAGIAN'); writeln;
Write ('inputkan bilangan pertama: '); readln(a);
Write ('inputkan bilangan kedua  : '); readln(b);
Hasil  := a DIV b; {diambil hasil bulatnya}
Sisa   := a MOD b; {diambil sisanya}
bagi   := a / b;   {hasil riilnya}
Writeln (a,' DIV ',b,' hasilnya: ',hasil);
Writeln (a,' MOD ',b,' hasilnya: ',sisa);
Writeln (a,' / ',b,' hasilnya  : ',bagi:2:2); Readln;
 END.

Jika dirun akan tampil bedanya antara MOD, DIV dan pembagian biasa. Untuk pembagian biasa harus menggunakan type data real, karena memungkinkan hasilnya koma.

divnmod

Mungkin itu dulu postingan dari saya hari ini. Silahkan dicoba-coba…

View original post 30 more words

Advertisements