var a,b,c,d,e,f,g:real; begin read(a,b); c:=a*a*3.1415926; d:=2*c; e:=2*a*3.1415926; f:=e*b; g:=d+f; write(g:0:2); end. /************************************************************** Problem: 1623 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/