Var a,b:integer; Begin Write('A = ');Read(a); Write('B = ');Read(b); Write('2(à+b)^3+7a^2b^2-3ab+6 = ',2*power(a+b,3)+7*sqr(a*b)-3*a*b+6) End.