Ответы и объяснения

2014-03-17T16:40:42+04:00
Не совсем понял вопрос, но попробую ответить:

var y,a,b:integer;
Begin
readln(a,b);
y:=(a+b)*(a+b);
writeln('y = ',y);
readln;
end.

Вводить 2 числа через пробел.