составить блок-схему алгоритма и программу вычисления абсолютной величины числа

Блок-схема - в прилагаемом файле.Программа на паскале:var a,ma:integer;beginwrite('a = ');readln(a);if a<0 then ma:=-a else ma:=a;writeln('ma = ',ma);end.Пример:a = -15ma = 15