Janilabo | Difference() [SCAR Divi]

{==============================================================================]
  Explanation: Returns the (absolute) difference between value1 and value2.
[==============================================================================}
function Difference(value1, value2: Integer): Integer;
begin
  Result := IAbs(value2 - value1);
end;

begin
  ClearDebug;
  WriteLn(Difference(-99, 99));
  WriteLn(Difference(2, 1));
  WriteLn(Difference(999, 0));
  WriteLn(Difference(4, 4));
  WriteLn(Difference(1000, 1000000));
end.