Program test; var a, b , c: integer; begin readln (a, b); c: =(a+b) * (b-a); writeln (c) end. .объясните как вы делали

Begin {начать} 
readln (A, B); {вести  А и В}
C:=(A+B) * (B-A);  {вычисление}
writeln (C)  {вывод С}
end. {конец}