Введите с клавиатуры два целых числа. Выведите на экран сумму чисел, разницу между числами, квадрат разности между числами, частное и остаток от деления первого числа на второе

Var

a, b: integer;

begin

readln (a, b);

writeln ('Сумма чисел: ', a+b);

writeln ('Разница между числами: ', abs (a-b));

writeln ('Квадрат разности: ', sqr (a-b));

writeln ('Частное: ', a div b);

writeln ('Остаток от деления первого на второе: ', a mod b);

end.