Надо сделать в программе паскаль. напишите и выполните программу на компьютере. программа вводит два числа, выводит сумму квадратов этих чисел минус их произведение.

Var a,b:integer;
begin
write('Введите первое число:');
readln(a);
write('Введите второе число:');
readln(b);
writeln('ответ:',(a*a+b*b)-a*b);
end.