Как делать? ввести два целых числа x y определить что больше квадрат суммы или сумма квадратов, вывести ответы "квадрат суммы" или "сумма квадратов" или "значения равны".
В паскале подробно.

Program kek;var z.q.x,y:integer;Beginreadln (x);readln (y);z:= sqr(x)+2*x*y+sqr(b);q:=sqr(x)+sqr(y);If z>y then write ('квадрат суммы')           else write ('квадрат разности');End.