Delphi Math

admin

var
  i,j: Integer;
begin
  i := 19 Mod 4;  餘數

  j := 19 div 4;   商數
end;