Begin11. Даны два ненулевых числа. Найти сумму, разность, произведение и частное их модулей.
var a, b: real;
begin
  write('Введите два числа ->');
  readln(a, b);
  writeln('Сумма модулей = ', abs(a)+abs(b):6:2);
  writeln('Разность модулей = ', abs(a)-abs(b):6:2);
  writeln('Произведение модулей = ', abs(a)*abs(b):6:2);
  writeln('Частное модулей = ', abs(a)/abs(b):6:2);
end.