Cara Menampilkan Sisa dan Hasil Pembagian

Catatan:
div    : hasil pembagian
mod    : sisa pembagian

Contoh: buatlah program dari pembagian dari 23 \2, cetak hasil dan sisanya.

{$APPTYPE CONSOLE}

uses
  SysUtils;
var
  a,b,c,d:integer;
begin
  writeln ('Sisa(mod) dan Hasil (div) pembagian');
  writeln (' ');
  writeln ('Nama : MUNAWIR');
  writeln ('NIM : 114224030');
  writeln ('***********************************');
  write ('masukkan a=');readln(a);
  write ('masukkan b=');readln(b);
  c:=a div b;
  d:=a mod b;
  writeln ('hasil=',c);
  writeln ('sisa=',d);
  readln;
end.

Baca Juga materi tentang  Variabel Array/Larik.
Terimakasih.