program jjj; var a,b:integer;y:real; BEGIN writeln('VVedite a'); readln(a); writeln('Vvedite b'); readln(b); y:=2*(sqrt(a+b)*(a+b))+(7*a*a*b*b)-(3*a*a*b*b); writeln(y); readln; END .