Найти разность между квадратом большего и кубом меньшего из 2х введенных чисел в paskalABC

var a,b: integer;

begin

write('Введите два числа: ');

read(a,b);

write('Разность между квадратом большего и кубом меньшего равна ');

if (a>b) then writeln(a*a-b*b*b)

else writeln(b*b-a*a*a);

end.