program Test;
var A, B , C: integer;
begin readln (A, B);
C:=(A+B) * (B-A);
writeln (C)
end.
Помогите пожалуйста.Объясните как вы делали