Pascal Abs function

Abs fonksiyonu, negatif veya pozitif bir sayının mutlak değerini döndürür.
Örnek:

uses
  System.SysUtils;
  var
  sayi1:Integer;
  sayi2:Double;
  sayi3:Real;

begin
  try
   sayi1:=-765;
   sayi2:=-212.5;
   sayi3:=159.9;
    { TODO -oUser -cConsole Main : Insert code here }


    Writeln('Sayı 1 = ',Abs(sayi1));
    Writeln('Sayı 2 = ',Abs(sayi2):2:2);
    Writeln('Sayı 3 = ',Abs(sayi3):2:2);
    Readln;

  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.

Sonuç
Sayı 1 = 765
Sayı 2 = 212.50
Sayı 3 = 159.90