Janilabo | IncE() [SCAR Divi]

{==============================================================================]
  Explanation: Increases the x value by N.
[==============================================================================}
procedure IncE(var x: Extended; N: Extended);
begin
  x := (x + N);
end;

var
  e: Extended;

begin
  ClearDebug;
  IncE(e, 0.01);
  WriteLn(e);
  IncE(e, 1.22);
  WriteLn(e);
end.