Вопрос, который вызвал трудности

Какая задача решается по следующей программе:
Program Test
var A, B, C: integer
begin
readln( A,B)
C:=(A+B)×(B-A)
writln C

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

Program Test;
var
A, B, C: integer;
begin
writeln('введи 2 числа ');
readln(A,B);
C:=(A+B)*(B-A);
writeln('C=',C);
end.