Question

Написать программу в Паскаль для решения задачи: Найти модуль числа a при условии, что само число a вводится с клавиатуры

Answer 1

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

Пример:
a = -5
a = 5

Answer 2

Var a:integer;beginreadln(a);Abs(a);Writeln(a);end.