Написать программу, определяющую модуль числа ( в паскале)

Var
a:integer;
begin
writeln('Введите число');
readln(a);
b:=abs(a);
writeln('Модуль этого числа ',b);
end.

Var a:real;
begin
writeln('Введите число');
readln(a);
a:=abs(a);
writeln('Модуль числа равняется ',a);
end.