Написать программу для вычисления модуля |a|=а, где а целое число

//Pascal ABC.NET v3.1 сборка 1172

Var
 a:integer;
begin
 readln(a);
 a:=abs(a);
 writeln(a);
end.

Пример ввода:
-8
Пример вывода:
8