Написать программу нахождения квадрата суммы двух чисел и их произведение(x=(a+b)^2 y=a^2b)
Var a,b,y,x:longint;begin readln(a,b); y:=(a+b)*(a+b);x:=(a*a)*b;writeln(y,x);end.