Какая задача решается по следующей программе?
Program Test
var A,B,C: integer;
begin
readln ( A,B);
C:(A+B)*(B-A)
writeln(C)
end.
С:=(A+B)*(B-A) должно быть ну и тогда С это разность квадратов А и В
Всмысле какая задача? (Ну если я правильно понял вопрос,то математическая) Тут находится только С по формуле: (A+B)*(B-A) и выводит результат (С) на экран.