Janilabo | Opposite() [SCAR Divi]

{==============================================================================]
  Explanation: Returns the opposite number of i. -9999 to 9999 OR 9999 to -9999 (- <=> +)
[==============================================================================}
function Opposite(i: Integer): Integer;
begin
  Result := (i * -1);
end;

var
  x: Integer;

begin
  ClearDebug;
  x := (10 + Random(100));
  WriteLn(Opposite(X));
  DecEx(x, (200 + Random(1000)));
  WriteLn(Opposite(X));
end.