Составить программу для вычисления разности кубов двух чисел решите

Разность кубов a^3-b^3
program asd;
var a,b,c:integer;
begin
read(a,b);
c:=a*a*a-b*b*b;
write(c);
end.